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March 1977 
SERIES 16 AUTO LOAD OPTION 
SUPPORT PROGRAM DESCRIPTION 
1. SERIES 16 ALO SUPPORT PROGRAM 
1.1 Related Documents 
Test Program Listing 06-194F01M96R01 
06-194F02M96RO01 
Test Program Tape _ 06-194F01M17R01 
06-194F02M17R01 
Auto Load Option User's Manual 29-522 
Model 6/16 Maintenance Manual 29-470 
16-Bit Loader Description Manual 29-231 


1.2 Test Programs to be run prior to loading this test 


Memory Test 06-003 
Processor Test 06-106 
Common Teletype Basic Confidence Test 06-004 
Common CRT Test 06-146 
Common Current Loop Interface Test 06-184 
Common Carousel 300 Test 06-183 
8/16 Processor Test Part 1 06-209 
8/16 Processor Test Part 2 06-210 
8/16E Processor Test Part l 06-211 
8/16E Processor Test Part 2 06-212 


ae PURPOSE OF TEST 
The Model 6/16 ALO Support Program: 


-Accepts CAL object as source information. 

-Generates Data Tapes from CAL object for the (Signetics or 
Spectrum Dynamics) ROM Programmer to create the ROM chips. 
-Checks the Data Tapes against CAL object. 

-Tests the ROM chips blown by the (Signetics or Spectrum 
Dynamics) ROM Programmer against the Data Tapes. 

-Tests the switch positions and data paths of the ALO. 


Bu MINIMUM HARDWARE REQUIRED 

3.1 Processor 
Model 6/16, 8/16 or 8/16E with ALO option 
8KB of Memory 


Test ROMS 19-186ROO0F10 and 19-186ROOF11 (Test Phase - TESTS 
1, 2 and 3) 


3.2 Console Input Device 

Paletype, CRT on PASLA, CAROUSEL 15, 30, or 300 “ 
3.3 List Device 

Teletype, CRT on PASLA, Line Printer or Carousel 15, 30, 300. 
3.4 Paper Tape Reader/Punch 


Teletype, or High Speed Paper Tape Reader/Punch 


4, REQUIREMENTS OF MACHINE UNDER TEST , 

This program assumes that the programs indicated in the "Test Pro- 

grams to be run prior to loading this Test" section, have been run 
without detecting an error. | 


4.1 Device Addresses 


See Appendix l. 


> LOADING PROCEDURE 
5.1 Test Tape Format 


Absolute, non-zoned object tape (M17) with front end boot loader. 
The test program occupies approximately 8KB of memory. 


5.2 Normal Loading Procedure 


Manually enter the X'50' sequence shown below, into memory: 


LOCATION CONTENTS 
mt ag? x'0000' 
X'32' X'0000' 
x'34! X'0000' 
X'36! X'0050' 
x'50° X'D500" 
X'52! X'00CF' 
x'54! x'4300" 
X'56! x'0080' 


(See TABLE 1 for desired configuration) 


TABLE 1. DEVICE DEFINITION TABLE 


pl igi hg 


HSPTR/P 
PTR 


Place the program tape in the paper tape reader. 

Execute at address X'30'. 

When the processor halts, observe the CHKSUM byte, displayed on 
console display register Dl. If it is zero, loading is complete; 
otherwise, repeat the loading procedure. 

5.3 Multi-Media Diagnostic Loading Procedure 

To load this program from the INTERDATA Multi-Media Diagnostic 
System, refer to publication 06-176A15. 

6. PROGRAM EXECUTION 


Refer to Appendix 1 and set up the addresses for console input device 
and the list device. 


Address memory location X'AOO'. Execute and observe the following 
title output to the list device: 


ALO SUPPORT PROGRAM 06-194F01R01 
or 


ALO SUPPORT PROGRAM 06-194F02R01 


7. OPERATING PROCEDURES 


The program is divided into two parts, each having the same loading 
procedures. Part 1 (06-194F01) contains the SPECIFY and VERIFY 

phase needed to generate and verify the Data Tapes. Part 2 (06-194F02) 
contains the TEST Phase. This phase is divided into four tests, 
testing the ALO switch positions, data paths and Customer ROMs. 


7.1 Specification Phase (06-194F01) 
The Specification Phase converts CAL object into 512 x 8 ROM tape 


(see Note) format. Use the following procedures to operate the pro- 
gram in the Specification Phase: 


STEP OPERATION PROCESSOR RESPONSE 
1 Start the program execution at ALO SUPPORT PROGRAM 06-194R01 
X'AOO' SIGNETICS OR DYNAMICS FORMAT? 
2 Type 'S' for Signetics, 'D' for »* 
Spectrum Dynamics SPECIFY OR VERIFY? 
3 Type 'S' PLACE OBJECT TAPE IN READER 
HIT RUN 
NOTE 


CAL object tape must be assembled Target 16 


STEP OPERATION PROCESSOR RESPONSE 

4 Place the object tape in the The object tape is read. 
reader and press Run TAPE OR LISTING OR BOTH? 
on display panel (X'78' speci- * 
fies the Binary Input Device) 

5 Type "T" if only data tape is PART NUMBER 
desired. * 
Type "L" if only listing is 
desired. 


Type "B" if both tape and list- 
ing are desired. 


6 Type a part number in the Tape and/or Listing for a ROM 


following format: chip is generated. Device is 
97-XXXRXXFOO. specified by I0+1, and the 

After the first part number Binary Output Device used for 

is typed in, the program punching a data tape is specified 

requires only the functional by X'7A'.) 

variation number (F00)to be 

typed. Output commands for these de- 
vices are specified in the 
contents of X'7B'. a, 


Program asks for another part 
number until all data is punched. 


END OF SPECIFY 


SPECIFY OR VERIFY? 
* 


NOTE 


PART NUMBERS ARE ASSIGNED BY INTERDATA 
WHERE : t 8 2 * 
97-XXX - IS THE PARENT NUMBER ~ 

RXX - IS THE REVISION LEVEL — | 
FXX - IS THE FUNCTIONAL VARIATION 


7.2 Verification Phase (06-194F01) 


The Verification Phase compares the Data Tapes produced by the 
Specify Phase with the CAL object data. 


Use the following procedures to operate the program in the Verifi- a 
cation Phase. f 


4 


( 


STEP OPERATION PROCESSOR RESPONSE 


1 Start execution at X'AOO' ALO SUPPORT PROGRAM 06-194R01 


SIGNETICS OR DYNAMICS FORMAT? 
* 


2 Type 'S' for Signetics, 'D' SPECIFY OR VERIFY? 
for Spectrum Dynamics * 
3 Type 'v' IS OBJECT PROGRAM IN BUFFER? 
* 
4 Type "Y" if this verification PLACE OBJECT TAPE IN READER 


phase is immediately following HIT RUN 
the Specification Phase (i.e., 

object program is already in 

buffer). Proceed to Step 6. 

If the object program is not in 

the buffer, type "N" and pro- 

ceed to Step 5. 


5 Place the object tape in the NUMBER OF DATA SEGMENTS? 
reader and press RUN * 
(Location X'78' specifies 
the Binary Input Device; loca-. 
tion X'79' contains the read 
command for the device). 


6 Type a hexadecimal number | PLACE DATA TAPE IN READER 
representing the number of HIT RUN 
data segments (one segment 
for each ROM of the ALO. 


7 Place the data tape into the Program verifies data tape and 
reader and HIT RUN. returns to Step 6 until all 
tapes are verified. 
When program asks for next 
data tape if all records are 
on one contiguous tape, just 
hit RUN. Otherwise place the 
next tape in the reader and 
hit RUN. END OF VERIFY 


SPECIFY OR VERIFY? 
* 


T wat Test Phase (06-194F02) 


The ALO TEST Program Tape tests, the DISABLE, ENABLE, and TEST Swith 
positions, ALO data paths, and the data on Customer ROMS against 
Customer Data Tapes produced by the SPECIFY Phase. TESTs 1, 2, and 
3 require the TEST ROMs 19-186ROOF10 and 19-186ROOF11 to be in place 
before test execution. (See Appendix 6 for position.) TEST 4 re- 
quires the Customer ROMs to be in place before test execution. 


The Test Phase (06-194F02) contains four tests: 


TEST 1 - checks the DISABLE switch position. 3 
TEST 2 - checks the TEST switch position and data paths 
using the two Test ROMs. 
TEST 3 - checks the ENABLE switch position. 
TEST 4 - checks the Customer's ROMs against the Customer's 
Data Tapes. 
Proceed in the following manner to operate in the TEST Phase: 
STEP OPERATION PROCESSOR RESPONSE 
1 = Start program execution at ALO SUPPORT PROGRAM 06-194R01 : 
. X'AOO'. THeST ly 2+ 3 OF 47 
2 Type TEST number desired. Processor responds with specific 


instructions which must be 
followed precisely. (Refer to 
Appendix 3 for expected results.) 
If any errors occur, refer to 
Appendix 4 for error explanation. 


NOTE 


If Processor does not have Power Fail/Auto 
Restart, RUN must be depressed after any 
Initialize with ALO in Disable Mode. 


8. ERROR PROCEDURES 


All error message numbers are explained in Appendix 4. 


When any load errors occur when loading (CAL) Loader object take 
corrective action specified in Appendix 4. 


On any Compare Fail error, re-execute that portion of test. 


9. _ PROGRAMMING NOTES 


To generate the desired ROM chips the following steps must be fol- 
lowed: (see 6/16 Auto Load Option User's Manual, 29-522, for 
specific details). 


1. Request Part Number from INTERDATA for ROM chips. 

2. Code Loader for ALO (see Appendix 5). 

3. Do Cal assembly of Loader, and obtain Loader object. 
4 


- Using SPECIFY Phase of Test Program (06-194F01), generate am 
Data Tapes, and Listing from the Loader object. a, 


Using VERIFY Phase of Test Program (06-194F01), verify 
Data Tapes against (CAL) Loader object. 

After Tapes are verified, send Purchase Order, Tapes 
and Listing to INTERDATA. 

When ROM chips are received, check them using Test 4 
of the Test Program (06-194F02). 


After chips are verified, they are ready for use. 
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APPENDIX 1 
USER DEVICE DEFINITION 
The halfword labeled I0 (see the listing) has the default value 
for Teletype as an Input/Output console device. If the setup is 


different, it must be changed as follows: 


0 7 8 is 


I0 


Console Device 
Identifier 


List Device 
Identifier 


cre enema aaa renee oe yes Be 


Console Device 


Identifier Explanation 


X'O1' GDT/CRT on PASLA/PALM Interface, strapped 


for FDX and the highest baud rate. 
x O2* TTY on TTY Interface. 

GDT/CRT on Current Loop Interface. 
Carousel 15, 30 on Current Loop Interface. 


Xx'04' _ Carousel 300 on PASLA/PALM, FDX, highest baud. 


0,X'05'-X'FF' Reserved. The program defaults it to 2. 


List Device 
Identifier 


Explanation 


X'O1' GDT/CRT as stated previously. 


=’ 02" 


TTY as stated previously. 


x* 03" Line Printer. 


LP Interface. 


x’oa" Carousel 300 as stated previously. 


0, X05 *=x' Pr" Reserved. The program defaults it to 2. 


The GDT or CRT; if used on PASLA/PALM Interface, should be strapped 
for the device address of X'10' and X'1ll' for receiving and trans- 
mitting side respectively. If it is different, the halfword labeled 
PASLADR (see the listing) must be changed accordingly. The Carousel 
300 follows this rule also, if different the halfword labeled 
PASLADR (see the listing) must be changed accordingly. 
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APPENDIX 1 (Continued) 


The Teletype or Carousel on Current Loop Interface, if used, should 
be strapped for the device address of X'02'. If it is different, 
the halfword labeled CLIFADR (see the listing) must be changed 
accordingly. 


The Line Printer, if used, should be strapped for the device address 
of X'62'. If it is different, the halfword labeled LPADR (see the 
listing) must be changed accordingly. ! 


Al~2 


APPENDIX 2 


COMMAND INPUT STRUCTURE 


An asterisk (*) is output to the list device to indicate that the 
program is waiting for user input. The user then types his input 
followed by a carriage return. An invalid input causes a (?) 


followed by a carriage return (CR) line feed (LF), and an asterisk 
(*) to occur. : 


All other commands require a specific physical action followed by 
the depressing of RUN or INITIALIZE on the display panel or the 
BRK key on the Console device. 


A2-1/A2-2 
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APPENDIX 3 


EXPECTED RESULTS TABLE 


Sample printout during the specify Phase: 


ALO SUPPORT PROGRAM 06-194F01R01 

SIGNETICS OR DYNAMICS FORMAT? 

*S 

SPECIFY OR VERIFY? 

“si 

PLACE OBJECT TAPE IN READER 

HIT RUN 

TAPE OR LISTING OR BOTH? 

*T 

PART NUMBER? 

*19-123RO1F00 FOO Tape is punched at this time 
PART NUMBER? 

*FOL z ' FOL tape is punched at this time 
END OF SPECIFY . 

SPECIFY OR VERIFY? 

* 


Sample printout during Verify Phase (object program in buffer): 


SIGNETICS OR DYNAMICS FORMAT? 


=S 

SPECIFY OR VERIFY? 

*V 

IS OBJECT PROGRAM IN BUFFER? 
a 4 

NUMBER OF DATA TAPES? 

*2 

PLACE DATA TAPE IN READER 
HIT RUN 

PLACE DATA TAPE IN READER 
HIT RUN 

END OF VERIFY 

NO ERROR 


Sample printout during Test Phase: 
ALO SUPPORT PROGRAM 06-194F02R01 
TEST 1, 2, 3 or 4 

*1 

PLACE ALO IN DISABLE MODE 

DEPRESS INITIALIZE 


DISABLE SWITCH OK 
NO ERROR 


Aol, 


APPENDIX 3 (Continued) 


THST L, 27 3 OF 4 


*2 

PLACE ALO IN DISABLE MODE 
DEPRESS INITIALIZE 

PLACE ALO IN TEST MODE 
PRESS BRK 

TEST SWITCH OK 

PLACE ALO IN DISABLE MODE 
DEPRESS INITIALIZE 

PLACE ALO IN TEST MODE 
PRESS BRK 

PLACE ALO IN DISABLE MODE 
PRESS BRK ; 
NO ERROR 


TEST 1, 2, 3 or 4 


*3 

PLACE ALO IN ENABLE MODE 

DEPRESS INITIALIZE 

ENABLE SWITCH OK 

PLACE ALO IN DISABLE MODE 

PRESS BRK a, 
NO ERROR i 


TEST 1, 2, 3 or 4 


*4 

NUMBERS OF ROMS TO VERIFY 
22 

SIGNETIC OR DYNAMICS? 

ba 


PLACE ALO IN DISABLE MODE 

DEPRESS INITIALIZE 

PLACE ALO IN TEST MODE - 
PRESS BRK 

PLACE ALO IN DISABLE MODE 

PLACE DATA TAPE IN READER 

PRESS BRK 

PLACE DATA TAPE IN READER 

PRESS BRK 

NO ERROR 


A3-2 


All error messages in 06-194F02R00 (TEST PHASE) 


APPENDIX 4 


ing format: 


ERROR ABCD 
where 
AB = Test number 
CD = Error number 
ERROR # TYPE OR ERROR 
O01 Checksum error 
02 Sequence Number error 
03 Attempt to load 
beyond the buffer end 
04 REF LOOP error 
05 Compare fail error 
06 TEST switch not 
operational 
07 DISABLE switch not 
operational 
08 ENABLE switch not . 
operational 
FN Load error 


are in the follow- 


Reposition the tape to the 
beginning of the record and 
depress RUN to reread the 
record. 


Reposition the tape to the 
proper record and depress 
EXECUTE to try again. The 
error usually occurs when the 
tape is improperly positioned 
following a checksum error. 


The object program is too 
large (the ALO can accept a 
program of a maximum 4k bytes.) 


This message results when an 
endless forward reference 

chain is encountered. It in- 
dicates that input tape was gener- 
ated incorrectly. 


This error occurs when there 
is any data mismatch. (See NOTE) 


Test TEST switch logic. 
Test DISABLE switch logic. 
Test ENABLE switch logic. 


This message results if an 
illegal control item is de- 
tected during load. Depress 
EXEC (RUN) to ignore the 
control item and continue 

N = specific control item (see 
29-231 for further detail). 


A4-1 


APPENDIX 4 (Continued) 


am, 
NOTE 
On any compare fail in addition to the error 
number the byte that failed is printed in the 
following manner: 
ERROR 0205 
IS AB SHOULD BE CD 
where : 
AB = the byte being tested . 
CD = the expected byte F 
XX = Hexadecimal address of bad byte 
YY = Chip position (See Appendix 6) 
On any compare fail, rerun that portion of the test to check for 
validity. Once validity is established consult TABLE A4-1. 
ERROR 05 am 
OCCURS IN PROBABLE FAULT r 
VERIFY 
PHASE Data Tape bad 
TEST 2 Bad ALO data path 
TEST 3 ALO loaded specified data wrong 
TEST 4 Either ROM chip contains bad 


data or ALO data path error. 


Re eee an: Raden a ot eth is Re ARIE HY it LARISA Oa Ane tlle pina te mAEN m  Mt nit 7 RNR i nhs nena 


(A Aan SACI AAR A CAS RA AA A tm 


TABLE A4-1. COMPARE FAIL ACTION . 
A total of 23 compare fails are queued in Test 4 and printed at 
the end of the test. If more than 23 errors occur the test is aborted 
and the errors printed in the following format. 


DATA ACT DATA EXP CHIP AD.H AD.D 


VV WW X YYYY 2222 
where 
VV = Actual Data i, 
WW = Expected Data + 
X = Chip which error occured 
YYYY = Address of bad data in Hexidecimal 
ZZ2Z2 = Address of bad data in Decimal. 
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APPENDIX 5 


CODING PROCEDURE FOR ALO LOADER 


Generate Program to do desired task. 

Debug Program. 

For maximum usage of ROM space, the size of your program plus 
four halfwords should come as close as possible to 1K, 2K, 

3K or 4K. 

After minimized or enhanced, debug once more. 


Set up prefix to program as follows. 


ORIGIN EQU * 


DC 70FO -starting PSW 
DC A (START) ~starting LOC 
DC A (ORIGIN1) -start of Loader CODE 
DC A (END) - end of Loader CODE 
ORIGINIL EQU * - start of Loader CODE 
START EQU * ~Sstart of Loader program 
- -Loader 
END EQU) *-1 “Last statement. of Loader CODE 
NOTE 


1. Memory Size between ORIGIN and END should be 
as close to 1K, 2K, 3K or 4K as possible 
for maximum usage of ROM space. 


2. Only one ORG statement should be used. 
3. No Define Storage (DS) statements are allowed 
in the Loader Code. 


All storage areas should lie outside loader 
programs. 
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APPENDIX 5 (Continued) 


Loader Formats 


Signetics 


Leader 

Part number (ascii) 
10 bytes of FF 

X'12' Tape on 

2 bytes of ascii data 


x27" 
2 bytes of ascii data 
X'27' 
32 bytes of ascii data 
(16 hex characters) 
27 * 
‘OD' Carriage Return 
"OA" Line Feed 


1024 bytes of ascii data 
(512 hex characters) 

X'14' Tape off 

leader 


~ 2-255 -RRMM - 


A5-2 


Spectrum Dynamics 


Leader 

Part number (ascii) 

10 bytes of FF 

X'OD'! 

X'OA' 

Decimal address in ascii 
X'20' Space 

8 bits in ascii 

X'OD' 

X'OA' 

Decimal address in ascii 
x'20' 

8 bits in ascii 


512 decimal addresses 
and 8-bit bytes 


OD 
OA 
leader 


ste 


nee 


( 


SERIES 16 ALG SUPPORT 


PROG= *NONE* 


ASSEMBLED BY CAL 03-066R05-00 


0000 
0000 
0001 
o002 
0002 
0063 
0003 
0004 
0004 
0005 
0005 
oo06 
0007 
9007 
6008 
0006 
0009 
0009 
OO0A 
0068 
Q00C 
0000 
9006 
YOOF 
GOOF 


PROGRAM 06-194F01R01 PAGE i 


OM WO OF Oe NS be 


10346216 08/02/78 


(32=81IT) 


SCRAT 
CROSS 
TARGT 16 
PROG SERIES 16 ALO SUPPORT PROGRAM 06-194F01R01 
KK KKK RK E KKK EK EK KR EK EERE KEK KK EKER EKER KKK KE EERE EKER EKA KAR ERE KER EERE 


COPYRIGHT INTERDATA INC, 


SERIES 16 ALO SUPPORT PROGRAM 06-194F01R01 


THIS PROGRAM IS USED TO VERIFY DATA TAPES PROGUCED BY THIS 
PROGRAM FROM CAL OBJECT INPUT 


THIS PROGRAM REQUIRES A 6/16+8/16+8/16£ WITH AN ALO 
AND AT LEAST 8KB OF MEMORY 


THIS PROGRAM IS BROKEN UP INTO 2 SECTIONS: 


SPECIFICATION PHASEs 

ROM CHIP LISTINGS ANO/OR ROM DATA TAPES ARE GENERATED FROM 
THE INPUT OBJECT TAPE 

VERIFICATION PHASE? 

ROM DATA TAPES ARE VERIFIED 


HR RRR HHH HHH HHH HEH 


eee RH 


RO EQU 0 
ZERO E@uU 8 
Ri EOu 1 
R2 Eau 2 
LINKS Eau 2 
R3 EQU 3 
CAT EQU 3 
RY Eau 4 
DEV EQu 4 
RS EGU 5 
PNT Eau 5 
R& EQU 6 
RT c@u 7 
LINK? EGU 7 
R& EQL & 
LINKS EQU 3 
Ro EQU 2 
COUNT EQU b>) 
R10 Eau 1G 
Ril Egu 11 
Ri2 £QU 12 
#13 EU 13 
R14 EQu 14 
x15 cQ@u 15 
LINK Eau 15 


* 
* 


* BOOTLOADER WITH CHKSUM 


AL100000 
AL109019 
AL1i00020 
AL100930 
&L100040 
AL100050 


AL100060 
AL1e0070 


oe 


AL160080 
AL106090 
ALi&6165 
AL100110 
AL100120 
AL106130 
AL100140 
AL100156 
AL100160 
AL100170 
AL100180 
AL100190 
AL100200 
AL100210 
AL100220 
4L1i00236 
AL1900240 
AL100256 
&L1002606 
AL100270 
AiL.100280 
AL100290 
AL100300 
AL100310 
AL106320 
AL100330 
AL100340 
AL16035a 
AL100360 
AL160370 
AL100380 
AL 100390 
AL100400 
AL100410 
AL100420 
AL100430 
AL1004490 
AL100450 
AL100460 
AL100470 
AL100480 
AL1004%90 
AL100500 
AL100510 
AL100520 


— 
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Q00GR 
00806 
0G8e2 
0086 
GOaA 
O08E 
0092 
0096 
009A 
009C 
OO9E 
O0A0 
O0A2 
O0A4 
OOAB 
OOAC 
GOAE 
0680 
0082 
0034 
C056 
008a 
00B8C 
COBE 
00c6 
o0c4 
00Cé 


2421 
4020 
célc 
C830 
CaSO 
D340 
DE4O 
9045 
2091 
9B45 
0855 
2234 
C251 
9351 
O765 
9461 
9A28 
9045 
2691 
9545 
C1io 
9486 
9828 
C870 
9557 
2203 


G22 
010G 
GE43 
0000 
0078 
0079 


a006 
g00b 


OOA4 


8000 


LEADER 


LOAD 


LOWT 


PAGE 


x*sot 
R21 
R2,Xt2ot 
R1.x'100° 
R3sLNZ2B 
R6:0 
R4ex*7e! 
R4exX* 79! 
R4eRS 
961 
R4&,RS 
ROeRS 
LEADER 
R5-<0C(R4L) 
R5e0tR1) 
R6en5 
R8eRi 
R2eR8 
R4~aR5 
92 
R4eRh5 
Ri»wlCap 
RBeRE 
R2+RB 
R7eX*gaaaa 
R5eR7 
LOwT 


2 10246316 08/02/78 


REGISTER SAVE POINTER(16-RIT M/C) 


R3 AOR( LAST NON-ZERO BYTE 3 
R6 CHKSUM BYTE = X*MNE 
INPUT DEV ADR 


Wo 


DUeBSY 


IGNORE LEADER 

STORE 1ST NON-ZERO & SUBSEQUENT BYTE 
RELOAD DATA BYTE 

GENERATE CHKSUM 


DU.BSY 
LOAD TILL LAST BYTE 
DISPLAY FINAL CHKSUM 


HALT PROCESSOR 


AL100530 
AL100540 
AL100550 
AL100560 
AL100570 
AL100580 
AL100596 
AL100600 
AL100610 
AL100620 
AL100630 
AL100640 
AL100650 
AL100660 
AL100679 
AL100680 
AL100690 
AL100700 
AL100710 
AL100720 
AL100730 
AL100740 
AL100750 
AL100760 
AL100770 
AL1007860 
AL100790 
AL100800 


nat 


( 
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00c8 


01900 
G102 
OLG4 
$166 


0108 
OidA 
010E 
0112 
0116 
OL1A 
O11E 
0i2e 
0126 
b12A 


a12c 
0130 
0132 
0134 
0136 
0134 
O13 
0142 
0146 
S14A 
o14c 
0150 
0154 
0158 
o1sc 
G160U 
0162 
0164 
0165 
G16A 
O16c 
0170 
o174 
0178 
OL7A 
O17E 
Q1lee 
6186 
0184 
O1LBE 


0202 
1011 
0202 
6262 


oTii 
C636 
4030 
C820 
4010 
4629 
C820 
46190 
4020 
6006 


41FO 
2701 
233D 
2703 
4230 
4000 
4810 
0320 
D340 
2307 
4810 
v320 
D340 
4800 
4000 
933u 
9E32 
D240 
2309 
2400 
4000 
4800 
4810 
9421 
4000 
4010 
D229 
41F 9 
cease 
4iF oO 


1EC& 
é022 
OOFO 
0030 
0632 
olec 
0034 
0036 


OSAE 


O16A 
0930 
OC6A 
OCAE 
Ccac 


océa 
ocac 
OCAG 
9102 
0C79 


oCchS 


uC7O 
O104 
ecéec 


OC76é 
OCG6E 
Cca4 
OS5E 
0C8& 
0BA2 


| — ¢ 
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ORG x*1oo°' 
OA OR OR EO KEK KK 
* 
* TEST CONSTANTS 
* 
IG oc x*0202? 
PASLADR OC x*1011" 
CLIFADR Oc x*#a202! 
LPADR DC X*6262° 


* 

SRE REE KES EAE KK EK KEE EKER E 

pet Perc oe ss Se. 

* START PHASE 

* 

STARTL XHR R1,.R1 
LHI R3eRSAVE 
STH R3—X'22? 
LHI R2«X*FO* 
STH R1sX*30° 
STH R2aXt52¢ 

ST LHI R2eSTART 
STH R1eX*34! 


STH R2eX*36" 
oc 0 

* START 

START BAL LINK+SETKB 
SIS RO 
BZS CRT 
SIS  RO+3 
BNZ TTY 

C300 STH  RO+PAUSE 
LH K1sCARRD 
LS R2.CAR2ND 
LB R4+CARRG2S 
BS CRT2 

CRT LH R1,CRTARD 
LS R2sCRT2NOD 
La R4,sCRTRQ2S 

cRT2 LH RO+PASLADR 


STH RO,»PASFLG 
LBR RS5,RO 
OCR R3eRe2 
STB R4,CONRS2S 
8s GOTLT 


TTY LIs ROe9 
STH RGePASFLG 
LH RO+«CLIFAODR 
LH Ri, CLIFRD 
EXBR Reakl 
GOTIT STH RO»CONADR 


STH R1+CONRO 
STB R2eCON2ND 
BAL LINK. CRLF 
LHI RS«aTITLE 
BAL R15ePRINT 
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I/O DEVICES) IDENTIFIER 
PASLA/PALM IDENTIFIER 
CURRENT LOGP INT R/W ADDRESS 
LINE PRINTER ADORFSS 


DISABLE INT AT PROCESSGR LEVEL 


SELECT REG SET 15 


II INT NEW PSwW LOC 


TAKE AN ILLEGAL INSTRUCTION INT 


ESTABLISH KEYBOARD DEVICE 
CRT ON PASLS 


CAROUSEL ON PALSA ? 
BRANCH IF WO 

REASET TRANS PAUSE FLAG 
CAROUSEL COMMANDS 
PASLA/PALM FORMAT COMMAND 


ANG FORMAT COMMANDS 


PASLA/SPALM ADDRESSES 
SET PASLA/PALM FORMAT 


RESET THIS FLAG 


CONSOLE SEVICE ADDRESSES 
CONSOLE READ/WRITE COMMANDS 
AND FORMAT COMMANDS 


PRINT TEST PROGRAM TITLE 


AL109820 
AL1008306 
AL1008490 


AL100850 


AL100860 
AL100870 
AL100880 
AL100890 
AL100900 
AL1i00910 
AL100920 
AL100930 
AL100940 
AL100950 
AL1009690 
AL1003706 
AL160980 
AL100990 
AL1010690 
AL101020 
AL101020 
AL101030 
AL101040 
AL161050 
AL101069 
AL1i01078 
AL101088 
AL101090 
AL101100 
AL1011190 
AL101120 
AL101139 
AL101140 
4101150 
AL101160 
AL101170 
AL101180 
AL101190 
AL101200 
AL101210 
AL101220 
AL101230 
AL101240 
AL161250 
&L101260 
AL101270 
AL101286 
AL101299 
4101300 
AL1013190 
AL101326 
AL 101335 
AL101340 
4L101350 
4L101560 


at 


Nae? 
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0192 
0196 
619A 
O19E 
01A2 
Q1A6 
BLiAA 
ulac 
0180 
¢1pe 
0134 
01686 
O1BA 
$1BC 
01BE 


01c2 
01C4 
01C6 
O1CA 
O1iCE 


0102 
0106 
01DA 
OLDE 
01£2 
O1LE6 
O1EA 
Q1EE 
G1F2 
J1F6 


41FO 
C850 
4H1FO 
41E0 
41F0 
C540 
2539 
C540 
2135 
24FO 
2305 
41E0 
220C 
24Fi 
4OFO 
0000 
0700 
0755 
4050 
4050 
4050 


6000 
C850 
41FO0 
41E0 
G1FO 
cS40 
4330 
C540 
4330 
41E0 
4300 


O95E 
OcEe4 
G8A2 
U98C 
0932 
0053 


0044 


0972 


0c80 
o1c2 


0c98 
OC1C 
6C96 


8102 
OD1C 
bBA!]) 
696C 
6932 
0053 
Q1FA 
0056 
O4OE 
v9T2 
VICE 


O1FA 
0882 
O4Fa 
OE4s 


138 
139 
146 
141 
142 
143 
144 
145 
146 
147 
446 
149 
150 


U6=-194FO01R01 


GOTITS 


GOTIT4 
GOTITS 
STTTST 


OK RR KE 
* SELECT 
* 

PHASE 


PHASE1 


* SPECIFY 


BAL 
LHI 


LINK. CRLF 
R5,SOR0FORM 
R1iS5¢PRINT 
R14-eASTSK 
LINK,GETCHR 
R4&,C*S? 
GOTIT+4 
R4,CrOFr 
GOTITS 
R15.0 
GOTITS 
R14,QUESTN 
GOTIT2 
R1Sel1 
R15-+SORDFLG 
x 

RO«sRO 

PNT «PNT 

PNT eDECADRS 
PNT +BIAS 
PNT »eNOCRLF 


SPECIFY OR VERIFY 


Eau 
LHI 


* 
R5sASGi 
LINK sePRINT 
R14eASTSK 
LINKeGETCHR 
R4eX*53% 
SPCFY 
R4eX*56° 
VERFY 

Ri4 eQUESTN 
PHASE 


PAGE 


PHASE 
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SIGNETICS OR OYNAMICS? 


PRINT IT 
PRINT * 
GET INPUT 


IS IT S FOR SIGNETICS 

YES GO FILL FLAG 

IS IT D FOR OYNAMICS 

NO VALID INPUT 

SORDFLG = 0 FOR OYNANICS (SPECTRUM) 
FILL IN FLAG 

? 

RETURN 


SIGNETICS OR DYNAMICS FLAG 


ZERO OUT DECIMAL ADDRESS 


RESET CR LF FLAG 


SPECIFY OR VERIFY OR TEST? 
PRINT IT 

ASTERISK 

READ ONE CHARACTER FROM CONSOLE 
IS IT S FOR SPECIFY? 

YESe GO TO SPECITY PHASE 

IS IT v FOR VERIFY? 

YES» GO TS VERIFY PHASE 

INVALID INPUTs QUFSTION AND 

GO AGAIN 


KEKE KEKE EERE KEK REK RE KEK RE REE EERE K EERE KEKE EE REE EAH AKEEREEEE KS 


SPECIFY PHASE 


PURPOSE $s 
TO CREATE A DATA TAPE FROM A GIVEN CAL OBJECT TAPE 


DESIGN SPECIFICATION? 


AND GENERATE A OATA TAPE AND/OR LISTING 


HOW TO RUN TEST: 


FOLLOW OPERATING PROCEDURES IN 06-194Ai5 


PCFY 


EGU 
BAL 
BAL 
LH 


x 

LINK, ZERRBE 
LINK4 +L. 00BU 
RisROMBFR+Y 


* 
* 

* 

* 

* 

* 

* 

* THIS PHASE IS OESIGNED TO READ ANY CAL OBJECT TAPE 
x 

* 

* 

* 

* 

* 

S 


ZERCG OUT ROM DATA BUFFER 


AL101370 
AL101380 
AL101390 
AL101400 
AL1014910 
AL101420 
AL101430 
AL101440 
AL101450 
AL101460 
AL101470 
AL101480 
AL101490 
AL161500 
AL101510 
AL101520 
AL161530 
AL101540 
AL101550 
AL101560 
AL101570 
AL101580 
AL101590 
AL101600 
AL101610 
AL101620 
AL101630 
AL101640 
AL101650 
AL101660 
AL101670 
AL101680 
AL1G61690 
AL101700 
AL101710 
AL101720 
AL101730 
AL101740 
AL101750 
&4L101760 
AL101770 
AL101780 
AL103790 
AL101800 
AL101810 
AL101820 
AL101830 
AL101880 
AL101850 
AL101860 
AL101870 
AL101860 
AL161890 
ALi61900 
AL101910 


( 
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0206 
G20A 
o20C 
0206 
0210 
0212 
0216 
O21A 
O21E 
6220 
p22% 
0228 
022c 
0230 
0234 
0238 
023A 
023 
0240 
0244 
0246 
024A 
024C 
6250 
0252 
0256 
0258 


G25C 
O25E 


0260 
0264 
0268 
026A 
U26E 
0272 
0276 
G27A 
O27E 
0282 
0286 
0288 
9238C 
O28E 
0292 
0294 
0296 
029A 
O29€ 
0282 
Q2A6 
C2A8 
O2AA 
O2ac 


4820 
OB2i1 
9024 
2621 
CA22 
C529 
4389 
4024 
2411 
4010 
4010 
C856 
R1FO 
41E0 
GiFo 
0706 
C540 
235A 
c540 
233A 
C340 
2339 
41E0 
2205 
4009 
2303 
4000 
c00d 
O7AA 
G7BB 
0000 
4610 
C410 
DAAL 
41F 9 
41FO 
C830 
41FO 
4800 
4000 
41E0 
2451 
4050 
0755 
41FO 
C624 
C526 
2185 
C520 
#280 
C520 
2133 
2452 
2393 
C520 


OE4A 


0052 


193 
i394 
195 
196 
197 
198 
i399 
26e 
201 
202 
203 
204 
205 
206 
207 
268 


GC6-194Fa0iR01 


CONTI 


TAPLST 


TAPE 


LIST 
BOTH 


RPARTN 


chOS 


CHD1 


CMD2 


R2eROMBFRtES 
R2<eR1 
R2:19 

R2el1 

R2.R2 

R2.3 

PNG 
R2sNTAPES 
Rial 
R1,.TAPFLG 
RisLSTFLG 
R5.4SG4 
LINK ePRINT 
R14 ,ASTSK 
LINK eGETCHR 
RORO 
R4eX*5Ht 
TAPE 
R4eX*4cC? 
LIST 
R4XtGQt 
BOTH 
R14,QUESTN 
TAPLST 
RO.LSTFLG 
BOTH 
RO,TAPFLG 
* 

R10.R10 
R11,K11 


* 
RieNTAPES 
Rlei 
R1iO¢R1 
LINK, SETKB 
LINK,.CRLFE 
R5.4S65 
LINK ePRINT 
ROIS 
RO«IOSAVE 
R14-.ASTSK 
PNT 

PNT «NOCRLF 
PAT SPNT 
LINK seSETCHR 
R2sR4 
R2eX*3Q! 
CHD1 
R2—eX#3A4* 
cCMD4Y 
R2,Ctet 
CcMB2 

PNT »2 

ChMD4Y 
R2.CIR? 
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FIGURE # OF BYTES 
SHIFT OVER 
INCREMENT 

DOUBLE 


STORE IN NUMBER OF TAPES 


SET TAPE FLAG 

SET LIST FLAG 

TAPE OR LISTING OR BOTH? 
PRINT IT 


READ GNE CHARACTER FROM CONSOLE 
JUST TAPE 

JUST LISTING 

OR BOTH TAPE AND LISTING 
INVALIO INPUT QUESTION AND 


RESET LIST FLAG 
GO TO NEXT SECTION 


RESET TAPE FLAG 


ZERO OUT R11 


SET UP FOR CHECK 
MASK OFF EVEN ODD BIT 
AOD OFFSET VALUE 


PART NUMBER 
PRINT IT 


LOAD 1 

SET CR LF FLAG 

ZERO POINTER 

READ A&A CHARACTER FROM CONSOLE 
LOAD ASCII CHARACTER INTO WORK 
TEST CHARACTER 

IF NOT O-9 CHECK FOR SPECIAL CHAR 
TEST CHARACTER 

BRANCH AND STORE wITH TAB VALUE 
TEST CHARACTER 

NOT - SE IF R OR F 

LOAD TAS vALUE OF 2 


TEST CHARACTER 


AL101920 
4L101930 
&L161940 
AL101950 
AL101960 
AL161970 
&L1019806 
AL102999 
AL102000 
AL102010 
AL102020 
AL102030 
AL10204%0 
AL102050 
AL102060 
AL102070 
AL102080 
AL102090 
AL102100 
41102110 
At102120 
AL1602130 
AL102140 
AL102150 
41102166 
AL102176 
411021890 
AL102199 
AL102200 
AL102210 
4102220 
AL1622390 
AL1022496 
AL102250 
ALi02260 
AL1G2270 
AL102280 
AL102290 
AL102300 
AL162310 
4L102320 
AL102350 
AL102340 
AL162350 
AL102360 
AL102370 
4L102380 
AL102396 
AL102400 
AL102410 
AL102420 
AL102430 
AL102440 
AL102450 
AL1024606 
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0280 
0282 
02B4 
0286 
u2BA 
02BE 
02c0 
0204 
02C6 
O2CA 
Gece 
0200 


0204 


V208 
C20Cc 
Q2E6 
02E4% 
G2E6 
Q2EC 
02F0 
d2F4 
02F8 
O2FA 
O2FE 
0302 
0304 
0306 
0508 
030C 
OSaE 
0312 
0316 
0318 
031C 
0320 


0324 
0328 
032C 
Q32E 
0332 
0336 
033A 
G33C 
0346 
0344 
0346 
0348 
CS4A 
O34E 
0352 
0354 
0356 


2133 
2456 
2306 
cS20 
4230 
2459 
D225 
2651 
C550 
4280 
0755 
4050 


41FO 
0000 
4810 
4339 
4180 
4170 
cé5o 
GIFO 
4610 
4236 
245A 
8830 
4160 
2751 
2633 
2430 
4189 
243A 
4180 
4810 
2337 
4110 
Caso 
41F9 
6000 
4870 
4330 
2404 
4810 
C820 
41F9 
O777 
D35a 
4iFo 
26A2 
0635 
9034 
D333 
D2a7 
2671 
0835 
C430 


0046 
0260 


OCiE 


OOOC 
O28E 


UC396 


O95E 
02D8 
ocoA 
6312 
GA18 
dA22 
OC1E 
CA32 
ocac 
0312 


ucBO 
OA10 


0A10 


0A10 
aco4y 


a96C 
OCcL1E 
DBA2 
0324 
ocao 
GA44 


0C98 
OC2E 
0818 


CE44 
OTFS 


OBFE 
oc34 


GOOF 


248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
266 
261 
262 
263 
264 
265 
266 
267 
268 
<69 
270 
271 
272 
273 
274 
275 
276 
e777 
278 


06-194F01R01 


k 


PUNLST 
PUNO 


PUNS 


LSTO 


PUNL 


CALG 


PAGE 


C403 

PNT eS 

CmMb4 

R2 «CF ®e 
RPARTW 
PNTs9 
R2,PARTNC(PNT) 
PNTe1 
PNTs12 
CMO0 

PNT sPANT 
PNT «NOCRLF 


LINK,CRLE 

* 

R1.TAPFLG 
LSTO 
LINK3e«SETUP2 
LINK2.PLEACGER 
R5<«PARTNO 
LINK «PUNCH 
K1-eSORDFLG 
LSTO 

R5.10 
R3eNULL 
LINKS eOUT1 
R5el1 

PUNS 

R3,13 
LINK3,0UT1 
R310 
LINKS, OUT1 
R1eLSTFLG 
PUNL 
R1e«SETUP 
R5SePARTNO 
LINK sPRINT 
*¥ 
R7eSORDFLG 
OYNPNLST 
RO4 
R1,DECADRS 
R2<eLNTOADR 
R15+HEXASC 
R76R7 
R5eROMBER(RIO} 
RiSd5-¢INCAORS 
R1Q0e2 

R3eR5S 

R34 
R3sASC(RS) 
RSsLNTOBPRT(R7) 
R7ai 

R3-eR5 
R3X*Fe 
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NOT R SEE IF F 

LOAD TAB VALUE 6 

BRANCH AND STORE WITH TAB VALUE 
TEST CHARACTRE 


LOAD TAB VALUE OF 9 

STORE INTO PART NUMBER BUFFER 
INCREMENT TABS 

LIMIT YET 

NO READ NEXT CHARACTER 


RESET CRLF FLAG 
IN ROM BUFFER 
CAR RETURN LINE FEED 


TAPE ? 

NO 

SET UP PUNCH DEVICE 
PUNCH LEADER TAPE 
LOAD PART NUMBER 
PUNCH IT 


LOAD NULL FF CHAR 
OUTPUT 1 
DECREMENT 
FINISHED YET 


OUTPUT 


OUTPUT 
LIST? 


SET UP LST DEVICE TO PRINT 
LOAD PART NUMBER 
PRINT IT 


TEST SIGNETICS OR DYNAMICS FLAG 
SPECIAL SPECTRUM DYNAMICS 
4 DIGITS TO CONVERT 


WHERE TO PuT IT 

CONVERT IT 

ZERO OUT R? 

LOAD UP BYTE TO BF PROSS 
INCREMENT DECIMAL AODRESS 
INCREMENT 


CONVERT TO ASCII 


AL102470 
AL102460 
AL102490 
AL102500 
&L102519 
AL102520 
AL102530 
AL102540 
AL102550 
&L102560 
AL102570 
AL102580 
AL102590 
AL102600 
AL102610 
AL102620 
AL102630 
AL102640 
AL102650 
AL102660 
4L102670 
AL102680 
AL102690 
AL102700 
AL102710 
AL102720 
AL102730 
AL102740 
AL102750 
AL102760 
AL102770 
AL102T80 
AL102790 
AL102800 
AL102810 
AL102820 
AL102830 
AL10284%0 
AL102850 
AL1062660 
AL102870 
AL102880 
AL102890 
AL102900 
AL102916 
AL102920 
AL102930 
AL102940 
AL102950 
AL162960 
AL102970 
AL102980 
AL192990 
AL103000 
AL103010 


ewer rerieniennnencctininimtldiiar tla: eth MAR AAO ese 88 eR cen 


ww 


SERIES 
035A 0333 
G35E D237 
0362 2671 
0364 c830 
0358 6237 
036C 2671 
O36E C570 
0372 4280 

0900 
o376 CESd 
OS7A 4037 
O37E 2672 
0386 4810 
0384 2337 
6386 4180 
O38A C859 
O38E 41F90 
0392 4610 
0396 2337 
0396 4110 
O039C C850 
03A0 4S1FO0 

0000 
e3a4 C3A90 
03A8 4236 

0000 
G3AC 4810 
0380 2330 
0362 4180 
03236 4810 
O3BRA 4330 
O3BE C850 
03Ce2 41F9 

0009 
03C6 4170 
GSCA 4B81u 
G3CE 2335 
0300 41Fo 
0304 41FO 

0000 
0308 4619 
b3DC C310 
G3E0 2332 
U3E2 2634 
Q3E4 S4AB 
O3£6 2420 
03E8 4020 
O3EC 2711 
O3EE 4010 
63F2 #230 
03F6 41Fu 
USFA casa 
OSFE 41FO 
o402 41F9 
0406 G1FO 


OBFE 
0C34 


0627 
6C34 


0030 
033C 


16 ALO SUPPORT PROGRAM 


503 
304 
365 
306 
307 
308 
369 
3iG 
311 


AD 


vie 


357 


J6-194F 01801 


CALL 


LSTi 


INCBOTH 


PUNY 


LST2 


INCI 


INC2 


( | 


PAGE 7 10346516 08/02/78 


R3,ASC(R3) CONVERT To ASCII 
R3eLNTOBPRT(R7) 

R71 

R3—exX"27¢ 

R3aLNTOBPRT(R7) 

R7el 

K7248 

CALO GO AGAIN 

*¥ 

R3-¢X*ODoOat © 

R3eLNTOSPRT(R7) 

R72 

RisTAPFLS TAPE? 

LSTi 

LINK3,SETUP2 SET UP PUNCH DEVICE 
R5.sLNTOBPRT SET UP TO PUNCH 
LINK ePUNCH PUNCH IT 

R1eLSTFLGE 

INCBOTH 

RiseSETuUP SET UP LIST DEVICE 
R5sLNTOADR SET LINE ADDRESS TO PRINT 
LINK ePRINT PRINT IT 

* 

R10eX*3FE* FINISHED ONE TAPE YET 
PUN1 NO GO AGAIN 

* 

Rie TAPFLG TAPE? 

LsT2 

LINK3.SETUP2 SET UP PUNCH DEVICE 
R1i.»SORDFLS 

PUN4 

R59 TAPOFF SET UP TAPE GFF CHARACTER 


LINK»sPUNCH PUNCH X*14" TAPE OFF 


* 


LINK2sPLEADER PUNCH TRAILER 


R1i»sSTFLG LIST? 

INCL 

LINK «CRLF 

LINK «CRLF 

* 

R1sNTAPES 

Riel IS IT EVEN OR ODD 
INC2 

R1i-+4% 

RiQeRil 

R2.0 ZERO OUT 

R2eDECAORS DECIMAL ADDRESS 

Riei OECREMENT 

Ri »NTAPES UPDATE # OF TAPES LEFT 
RPARTN NEXT 

LINK» SETKS 

R5e4SG15 END OF SPECIFY 
LINK,PRINT PRINT IT 

LINK «CRLF CAR RETURN LINE FFED 
LINK »CRLF CAR RETURN LINE FEED 


AL103020 
AL103030 
AL103040 
AL103050 
&L103060 
AL103970 
AL103080 
AL103090 
AL103106 
AL103110 
4L103120 
AL103130 
AL1031490 
AL103150 
AL103160 
AL103176 
AL103180 
AL1031990 
AL103200 
AL103210 
AL103220 
ALi03230 
AL103240 
AL103250 
AL103260 
AL103270 
AL103260 
AL103290 
AL103300 
AL1033106 
AL103320 
AL193330 
AL1033990 
AL1033590 
AL103360 
AL103370 
AL103380 
AL103390 
AL103400 
AL103410 
AL103420 
AL103430 
AL1035440 
AL 103450 
AL103460 
AL103470 
AL103480 
AL103490 
AL103509 
AL103510 
AL103520 
AL103536 
AL103540 
4L103550 
AL103569 
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O40A 


4300 


C850 
41FO 
41E0 
41FO 
C540 
2538 
C540 
2630 
41FO 
4120 
o00a 
C850 
RLF O 
%1E0 
W1F9 
08354 
CB30 
4030 
2732 
C330 
4230 
OTAA 
0788 
cs5so 
41F9O 
4170 
C839 
4030 
4830 
C4#30 
OAAS 
D3CA 
41FO 


6000 
C590 
2136 


01C2 


0076 
08A2 
Qgsac 
0932 
0059 


OG4E 


0882 
O4FS 
0432 
ornBe 
QBA2 
o98c 
0932 


0030 
0c92 


FFF9 
0432 


obDCc8 
08A2 
0892 
9200 
GCcT2 
uc9z2 
0001 


SE44 
OB2A 


0460 
0027 


$58 
359 
360 
361 
362 
463 
364 


KRKEEKEKEKEKKA KEE ERE EEE KHER KK KKK ERREKREKESEERERERKEKEKKERE ESKER KERAERKEKE E 


p 


a* ee HERE H HHH KH HHH 


ERF 


CONT 
RSEG 


ROCO 


VERO 


5 


VERIFY PHASE 


URPOSES 


PAGE 


STTTST 
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TO VERIFY THE DATA TAPE GENERATED FROM CAL OBJECT BY THE SPECIFY 


PHASE. 


DESIGN SPECIFICATION: 


THIS PHASE IS DESIGNED TO CHECK THE DATA TAPES. THE PROGRAM 
MAKES SURE THE CAL OBJECT IS READ AND THEN READS THE DATA 
TAPE AND EFFECTIVELY REGENERATES THE DATA TAPE FROM 

CAL OBJECT AND CHECKS IT AGAINST THE PUNCHED DATA TAPE. 


HOW TO RUN TEST? 


FOLLOW OPERATING PROCEDURES IN 06-194A15, 


Y LHI 
BAL 
BAL 
BAL 
CLHI 
BES 
CLHI 
BNES 
BAL 
BAL 

5 EQu 

NO LHI 
BAL 


MP XHR 


R5.4SGB 
LINK» PRINT 
R1i4sASTSK 
LINK »GETCHR 
R4eX*59¢ 
CONTS 
R4aX*4E& 
VERFY 

LINK, ZERRBF 
LINK4eLOOBY 
x 

R5.8SG610 
LINK.sPRINT 
R14 e«ASTSK 
LINK «GETCHR 
R3eR4 
R3exX*30° 
R3eNTAPES 
R3ez2 
R35e71-6 
RSEGNO 
R1G-eR10 
R1iieR11 
R5.MS611 
LINK,PRINT 
LINK2eEXEC 
R3.512 
R3,SPECOUNT 
R3«NTAPES 
R3a1 

R1i0sRkS 
R1l]2-eROMBFR(R10) 
LINK «ROBYTE 


* 
ROeXt2T7t 
VERS 


IS OBJECT PROGRAM IN BUFFER? 
PRINT IT 


READ ONE CHARACTER FROM CONSOLE 
Y? 


N? 


ZERO OUT ROM BUFFER 
LOAS CAL OBJECT 


NUPBER OF DATA SEGMENTS? 
PRINT IT 


GET INPUT FROM CONSOLE 


IF NOT 0 2 4 OR 6 THEN TRY AGAIN 
ZERO OUT R10 

ZERO OUT RI 

PLACE DATA TAPE IN READER 

PRINT IT 

HIT EXEC AND HALT 

LOAD ONE LIMIT 

STORE INTO COUNT 


MASK OFF FOR EVEN OR 000 
ADD OFFSET VALUE 


READ NEXT BYTE ANG COMPARE EXIT 
ON ERROR 


ARE TWO PREVIOUS DIGITS GOOD BYTE 
NO TRY OTHER SPECIAL CHARACTER 


AL103570 
AL1035a0 
AL103590 
AL103600 
AL103610 
AL103620 
AL103630 
AL103640 
AL103650 
AL103660 
AL103670 
AL103680 
AL103690 
AL103700 
AL1037106 
4L103720 
AL103730 
AL103740 
AL103750 
AL103760 
AL103770 
AL103780 
AL103790 
AL103600 
AL103810 
AL103820 
AL103830 
AL103840 
AL103850 
AL1038660 
AL163870 
AL103860 
AL103890 
AL103900 
AL103916 
AL103920 
AL103930 
AL103940 
AL103950 
AL103960 
AL103970 
AL103980 
4L103990 
AL104000 
AL104010 
AL104020 
AL1040230 
AL1040406 
AL104050 
AL104060 
AL108070 
AL104066 
AL104096 
AL104100 
AL104110 


_ 
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0486 


0488 
G48 
6490 
0494 
0496 
0498 
O44 
049C 
O49E 
o4A2 
O4A4 
O4A8 
O4AC 
0480 
0484 
0488 
o4BC 
04c0 
o4c2 


04c6 
O4CA 
o4cc 
0400 
04D2 
0406 
0408 


40 
O#EO 
C4E2 
O4FE 
O4EB 
OEC 
C4FO 
O4F4 


O4FS 
O4FC 
0500 
0504 


o508 


0000 
05c6é 
0000 
4230 
4300 
C399 
263C 
9031 
2382 
2684 
S4AB 
4830 


2731 


4030 
4230 
41FO 
41F0 
C8350 
41F0 
4306 
26A2 
4300 
0000 
4810 
2035 
481g 
2711 
4U010 
2036 
4300 


00690 
C610 
9501 
4800 
2137 
c850 
41FO 
41FO 
4300 


0000 
C850 
41F 0 
4179 
4170 


0362 


0486 


0488 
oB64 
O4Ce 
00144 


0cg2 


ocg2 
0454 
O35E 
OS5E 
ODE 4 
08Ae 
64DC 


0478 
d4cée 
0c80 


gc7T2 
0c72 


0496 


Q40C 
GOFF 


OCSE 


0D10 
06A2 
O95E 
01C2 


O4FS 
0D36 
08A2 
9892 
O50A 


813 
414 
415 
416 
417 
418 
$19 
420 


06-194F01R61 


VER6 


TOES 


VERS 


RETURNI 


VER2 


RETURN2 


RETURNS 


EGU 
CLHR 
FSU 
BNE 
8 
CLHI 
SNES 
SRLS 
BNCS 
ATS 
EXSR 
LH 
SIs 
STH 
BNZ 


* 
R12«R6 

* 

ERGS 
RETURNS 
RIeM'1ye 
VERY 

R31 

VER2 
R114 
R1Ge«Ri2l 
R3eNTAPES 
RSet 
R3-eNTAPES 
VERO 

LINK eCRLFE 
LINK.CRLFE 
R5-¢MSG14 


LINK.sPRINT 


TSTEND 
R10e2 
VERL 

x 


R1-+SGROFLG 


RETURN2 


RieSPECOUNT 


Riel 


R1+eSPECOUNT 


RETURN2 
RETURNI 


PAGE 
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COMPARE OBJECT BYTE WITH DATABYTE 
COMPARE FAIL 
IS IT END OF TAPE? 


TEST FOR EVEN GR OOD TAPE IN PAIR 

IF EVEN THEN SKIP DOWN ANDO OECREMENT 
INCREMENT 

INTO CGRRECT POSITION 


DECREMENT 


CAR RETURN LINE FEED 
CAR RETURN LINE FEED 
ENO OF VRIFY 

PRINT IT 

FINISH 

INCREMENT 

GO AGAIN 


LOOK AT SIGN OR DYN FLAG 


DECREMENT 
UPDATE COUNT 


KKK ERK KEK EK KEE KEKE KE KEE EE EE ERE KER EKER EERE KEELE EERE EE RAAT KR EEERE TE 


* 


* TEST MOGULE END ROUTINE 


* 
TSTENC 


KEEP7 


TSTENDL 


Eau 
LHI 
EPSR 
LH 
BENZS 
LHI 
BAL 
BAL 
3B 


* 
R1eX'*FO* 
ROsR1L 

RO ,NOERR 
TSTENDL 


RS»NOERMSG 
LINK PRINT 


LINK eCRLF 
STTTST 


DISABLE INT @ PROCESSOR LEVEL 
LOOK a@ ERROR FLAG 


PRINT "NO ERROR" 


* THIS SUBROUTINE READS THE OBJECT PROGRAM FROM INPUT TAPE+ 


* RELOCATES 1Te 


LOOB 


Eau 
LHI 
BAL 
BAL 
EAL 


BR 


* 
R5.MSG3 


LINK +sPRINT 
LINK2eEXEC 
LINK2s800Bd 


LINK4 


SE RHAEKKKKKKSESEEKCAKEEC EK EKERES 


* 


BASIC REL-LOADER 


AND STORES THE RELOCATED PROGRAM INTO ROM BUFFER 


PLACE OBJECT TAPE IN READER 
PRINT IT 


READ THE OQBUJECT TAPE AND STORE THE 
PARTIALLY RELOCATED PROGRAM IN TO 
ROM BUFFER 


AL104120 
AL104130 
AL104140 
AL104150 
AL104160 
AL10#170 
41104180 
AL104190 
AL104200 
AL104210 
AL104220 
AL104230 
AL164240 
AL104250 
AL104260 
AL104270 
AL1048280 
AL1048290 
AL104300 
AL108310 
AL104320 
AL104330 
AL104340 
AL104350 
AL1904360 
ALZTOS379 
AL104380 
AL104390 
AL104406 
AL104410 
4L104420 
AL104430 
AL104440 
&L164450 
AL104460 
AL104470 
AL1 08480 
AL104490 
AL104500 
AL1604510 
AL104%520 
AL104530 
AL104540 
&104550 
AL104560 
AL194570 
AL104560 
AL106599 
AL1048600 
AL104610 
AL104620 
AL1 68630 
AL104640 
AL1i04650 
AL108660 
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468 * THIS LOADER OPERATES STAND-ALONE. IT ACCEPTS STANDARO AL104670 

469 * LOADER-FORMATs INTERDATA TYPE 08/09 OR M16/17 FORMATS AL104680 

470 * PROGRAM-RELOCATION AND FORWARD-REFERENCE CHAINING IS AL104690 

471 * ALLOWED FOR. AL104700 

472 * LABEL AND ENTRY ITEMS ARE IGNORED AL104710 

473 * EXTRN ITEMS HALT, BUT ARE IGNORED ON RESTART AL104720 

474 «* COMMON ITEMS HALT: WITH NO RESTART AVAILABLE AL104730 

475 * AL104740 

476 * ERROR-STOP DISPLAYS: AL104750 

477 * 01 CHECKSUM ERROR AL104760 

478 * 02 SEQUENCE-ERROR AL104770 

479 * 03 ATTEMPT TO LOAD OUTSIDE THE BUFFER AL104780 

480 * 04 REF-CHAIN LOOP AL104790 

4a1 * FX X=CONTROL=ITEM ENCOUNTERED AL104600 

482 * AL104810 

4a5 x AL104820 

484 x AL104830 

4B5 AL194840 

c0v0 0004 486 BYTE Fau 4 AL104850 

0000 0005 487 PICK EQu Ss AL104860 

0000 GOs 486 SEQNUH EQU 6 AL104870 

0000 coG7 489 GNE Eau 7 AL104880 

0000 o006 490 TWO Eau a AL104690 

0000 0009 491 FOUR Eau 9 AL104900 

0000 GUOA 492 A Esu 10 AL104910 

occa coos 493 8 Eau 1a AL104920 

ooog ogoc 494 C fQu 12 AL104930 

9000 000D 495 0 Edu =13 AL104940 

0000 o00E 496 € cau 14 AL104950 

ovo0 000F 497 ABSF EQU  =15 AL108960 

0000 0078 498 BINGV Eau x*78F AL104970 

499 * AL104980 

050A 0000 1EC6 500 RDOBY STM  ROsRSAVE AL104990 
OS0E 48Ao oCi1c 501 LH A+BIAS LOAD BIAS VALUE AL105000 
0512 4Gao0 OBF6 502 STH  AsLOC LOC=BIAS AL105010 
0516 C&AG oE44 5a3 LHI AvROMBFR AL105020 
OS1A 40AG Oca4 504 STH  AsPTOP AL105030 
O51E B66 505 CONT SHR  SEQNUM,SEQNUM CLEAR SEQNUM AL105040 
0520 OBFF 506 SHR  ABSF.ABSF SET REL MODE AL105050 
0522 csTv 0001 507 LHI 9 ONE 2 SET CONSTANTS 12.4 AL105060 
0526 C8ao 0002 598 LHI TWO? AL105070 
052A C890 0004 809 LHI FOURS4 AL105080 
052— 0867 510 NEXT SHR  SEQNUM,ONE DECR SEQ@ COUNT AL105090 
9530 4120 9740 511 BAL R2-eINPUT INPUT ONE RECORO AL105106 
0534 C&AQ 006A 512 LHI A+106 COMPUTE CHECKSUM AL165110 
0538 o7CC 513 XHR Ca CLEAR REGISTER C AL105120 
053A 47CA LEGS 514 CKIT XH C+BUFF(A} BY XH OF EVERY HW OF BUFR AL105130 
O53E OBA8 515 SHR Ay TWO AND WHEN DONE, AL105140 
0540 2213 516 BNMS CKIT AL105150 
0542 C7Co FFFF 517 XHI Cyd WITH FFFF. RESULT SHOULD AL105160 
coco 0546 518 TSE1 Eau ok AL105170 

9546 4230 0S5Cé 519 BNZ  CERR BE ZERO. AL105180 
0548 4560 1644 52u CLH  SEGNUM BUFF COMPARE TO SEQ Num AL105190 
ecou O54E 521 T0E2 EQu tit AL105200 

OSHE 4256 0502 522 BNE  SERR AL105210 


ete kihnaemmeaan a EER mee nt 
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9552 
0556 


O55A 
O55E 
0562 
0566 
056A 
056C 
O56E 


0572 


0574 
0576 
0578 
O57A 
U57C 
957€ 
0580 
6582 
0584 
0586 
0588 
058A 
053c 
O58e 
0590 
0592 


0594 
0598 
059 


-O59F 


05a0 
O5Aa2 
05A6 
OSAA 
o5ac 
0580 
05384 
0588 
USBA 
0538C 
O5S5E 
o5ce 
95c4 


o5c6 
GOSCA 
U5CE 


0502 
0506 
O5SDA 


cé50 
C849 


C559 
4350 
4BAS 
4119 
OB8EA 
GAAA 
485A 
0308 


o52€ 
0608 
O6E6 
CECE 
0626 
6632 
0684 
dé6CO 
0666 
O66E 
G68C 
O6AC 
G6d2 
06cc 
0594 
Q6cc 


§8A5 
41156 
GSAS 
2134 
O766 
4300 
C8BE 


1£48 
000C 


1E80 
052E 
60906 
G72A 


C574 


0000 
Q72A 


OS5A 
OOFO 


0005 
6004 
O8A2 


G5Ce2 


a5C6 
3631 
opoc 
O5F 6 
0502 
3032 
opac 
O5F6 


536 


537 


338 


539 
549 
541 
542 
543 
544 
545 
546 
547 
548 
549 
550 
S51, 
552 
553 
554 
555 


556 
557 
S58 
339 
560 
S61 
562 
563 
564 


LOOP 


JUMP 


EITM 


LERR 


SERR 


oc 


OC 


bc 


PAGE 


PICK eQUFF+4 
BYTE+12 


PICK sBUFF+108 
NEXT 
AeO(PICK) 
R1,EXTR 

EeA 

Ads 

BeJUMP (A) 

5 


NEXT sEND »CHAIN FLIP 


LDx«eLDLeRFINeOFIN 


UNAB.UNRL »DUAB eDURL 


RBCD DCD eEITM LABEL 


AcQ(PICK) 
R1,EXTR 
A-sFOUR 

LERR 
SEQNUM s+ SEQNUM 
LOGP 
Bex*FO(E} 
ONE eB 
BeETESTNO 
R5eERRMSG 
LINK,PRINT 
ONE el 

TwOe2 

FOUR «4% 

ety 
X*h000t +L OOP 


* 
A«C*aQ1t 
AsERRNG 
ERROR 

* 
AeC*Ga? 
AsERRNO 
ERROR 
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ADJUST PICK seBYTE 


TEST IF RECORD DONE 
EXTRACT NEXT COMMAND 
SAVE ITEM FOR ERR STOP 


60 TO COMMAND RGUTINE 


FETCH SECOND OIGIT 
OF EX CONTROL ITEMS 
IF IT*S E4¥s ZERO SEQ 


FETCH ERROR CISPLAY 

SHOW ERROR AND STP 

STORE FOR ERROR PRINT 
LOAD ERROR MSG FOR PRINT 
PRINT IT 

RESTORE CONSTANTS 1:24 


SET UP FOR PRINT 


SET UP FOR PRINT 


AL105220 
AL1052306 
AL105240 
AL105250 
ALi05260 
AL105270 
AL105280 
AL105299 
AL105300 
AL1053106 


ALi05329 


AL105330 
AL105349 


AL105350 


AL105360 


AL105370 


AL105360 
AL105390 
4L105800 
AL105410 
AL105920 
AL105430 
AL1054%40 
AL105456 
4.105460 
AL1054%70 
AL105480 
4L105490 
AL105500 
AL105510 
AL105520 
AL105530 
AL165540 


AL105550 
AL105560 
AL105576 
AL105580 
4L105590 
AL105600 
AL105610 
AL105620 
AL105630 
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oo00 CSDE 565 ADER Eau * AL105640 
O5DE C8AG 3033 566 LHI AeC'O3! AL105650 
Q5£2 40A0 SOOC 567 STH AsERRNO SET UP FOR PRINT AL105660 
O5€6 2305 568 RS ERROR AL105676 
0000 O5€8 569 RELP EGU * AL105680 
05£8 CB8AD 3034 570 LHI A,yC'O4? AL105690 
OSEC 4OA0 ODOC 571 STH AsERRNO SET UP FOR PRINT AL105700 
O5F 0 SATA 572 ERROR WDR ONE CA SHOW ERROR STOP AL105710 
O5F2 c8su oca4s 573 LHI R5+ERRMSG AL105720 
OSF6 41FO O6A2 574 BAL LINK sePRINT PRINT IT AL105730 
OSFA 2471 575 LIS ONE +1 RESTORE CONSTANTS 12204 AL105740 
OSFC 2482 576 LIS TWO+2 AL165750 
OSFE 2494 A777 LIs FOUR+4 AL105760 
0600 c200 0604 578 LPSwH -¥+4 AL105770 
0604 6006 579 DC X*BO000* eAINEXT+2) AL105780 
0606 6536 
0608 p100 1&6 586 END LA RO+RSAVE AL105790 
069C 0307 581 BR LINK2 RETURN AL105600 
582 «* &AL105810 
O60E C7FO FFFF 583 FLIP XxHI ABSF eX*FFFF? FLIP THE ABS FLAG AL105820 
0612 48A0 OBFE 584 LH ArLOC FLIP LOC COUNTERS AL105830 
0616 4880 O6F8 5385 LH BseLOC+2 AL105840 
O614 &OA0 O8F8 586 STH AsLOC+2 AL105850 
D6iE 40B0 OSF6 587 STH B+LOC AL105860 
0622 4300 0554 588 B Loor AL105870 
589 « AL105880 
0626 4130 0704 590 LDX BAL R3sGETT SET EXECUTION ADRS AL105890 
O62A 4000 OCBA 591 STH DeLOCx AL105900 
062E 4390 0554 592 6. LOOP AL105910 
593 x AL105920 
0632 4130 0704 594 LOL BAL R3,GETT SET LOAD LOCATION AL105930 
0636 4600 acic 595 STH DeBIAS AL105946 
O63A %0D0 OBF6 596 LDLOA STH OeLoc STORE LOCATION COUNTER VALUE AL105950 
063E 4809 0C1C 597 LOLI SH DeBIAS AL105960 
0642 CADO GER4 598 LODL2 AHI DeROMBFR AL105970 
0646 C5D0 df44 599 CLHI O-+ROMBFR COMPARE AGAINST ROMBFR ADDRESS AL105980 
0000 O64A 600 TOES EQU * AL105990 
O64A 4230 0506 601 RE ADER &L106000 
O64E c5D0 1643 602 CLHI OeRMBED AL10¢6010 
0652 4380 050E£ 603 BNL ADER OUTSIDE ROM BUFFER 4L106020 
0656 4500 0C84 604 CLH DePTOP AL106030 
065A 4280 O55A 605 BL Loop AL106040 
G65£ 4G06 @Ca4 606 STH O,PTOP AL106050 
0662 4300 O55A 607 B LOOP AL106060 
668 * AL1C6070 
D666 4120 O714 609 UNAS BAL R2,WORD LOAD 2 BYTES ABS AL106080 
066A 4300 0676 bio 5 UNRX AL106090 
066£ 4120 0714 611 UNRL BAL R2eKORD LOAD 2 BYTES REL AL106100 
0672 4ADO OC1C 612 AH DeBIAS AL2106110 
C676 4BCO OSFE 613 UNRX tH CeLOC AL106120 
OG7A 4BCA OC1C 614 SH C+BLAS AL106130 
Co7E 4ODC VE44 615 STi DyROMBFRIC) STORE AL106140 
0682 48D0 OBFS 616 LH O+LOC LOC VALUE AL106150 
0686 CAD 617 AHR O+TRO INCR. LOC AL106160 
u688 4300 O63A 618 B LOLA ALi06179 


Poreg 


eee 


( 
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céac 
0699 
0694 
96948 
969C 
S6AG 
D6A4 
C606 
O6AA 


o6ac 
06B0 


0684 
0686 
v6BaC 


86C9 
06c4% 
06C8 


o6cc 
06D0 
06D2 
0606 


0658 
o60C 
D6E0 
O6E4 


O6E6 
O6EA 
S6EE 
v6Fe2 
05F6 


O6F8 
O6FC 
O6FE 
0700 


O70% 
0708 
O70A 
S70E 
0712 


0714 
0716 
O71A 
O71E 
0722 
OT24 


CBEO 
§120 
48C0 
46CQ 
§0DC 
48C0 
OACS 
4O0CG 
O30E 


CBEO 
4306 


4130 
4600 
4300 


4130 
40B0 
4300 


C8Bo 
2304 
C8B0 
2301 
0000 
4120 
4129 
4120 
0308 


48D 
48E0 
SB8CE 
4QDE 
o5c0 
0G00 
4330 
OBEC 
2038 
4300 


4120 
OSFF 
4233 
4AD0 
0303 


06c? 
4¥8A5 
4119 
cooo 
O6DA 
OBC? 


0666 
0714 
OBFS& 
ecic 
OE44 
OBFS 


SBFS 


O66E 
66906 


O704 
ocae 
OS5A 


o704% 
Océs 
Q55A 


OS5A 
O5A6 


o6cCc 
O714 
0714 
o714 


oC&8 
ucsé 
e000 
80090 


O6F8 
05£8 
O554 
0714 


0000 
Ocic 


0000 
O724 
oo04% 


419 
629 
621 
622 
623 
624 
625 
526 
627 
626 
629 


O06-194F G1R01 


* 
DuUSB 
DU 


GETT 


E.sUNAB 
R2.WwORD 
C+LOc 
C,BIAS 
C,ROMEFRI(C) 
C«tOc 
C+TWO 
C+LOc 

& 


E,UNKL 
DY 


R3,6ETT 
DsREF 
LOOP 


R3eGETT 
DeOEF 
LooP 


B,LooP 
SKIPD 
B»LERR 
SKIPO 
DeCD 
R2eeORD 
R2eWORD 
R2eWwORD 
B 


OyCEF 
EsREF 
C,0E) 
DeQ(E) 
c,0 

& 
RELP 
E»C 
CH1 
LOGP 


R2-eWORD 
ASSF .ABSF 
O{R3) 
0,.3ITAsS 

R3 


C+FOUR 
AsO(PICK) 
RL.EXTR 
Ds4 

Gea 
C,ONE 


( 


PAGE 
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LOAD & BYTES ASS 


LOAD 4 BYTES REL 


GET REF VALUE 


GET DEF VALUE 


SKIP DATA-ITEMS 


DEFINE CHAIN: 


FOLLOw THE THREAD 
AND DEF EACH REF 
SUT IF A REF=A DEF. 


THEN WE'VE BEEN HERE BEFORE 
AND THIS IS A REF}LOOP. 


SO FETCH ANOTHER ITEM, oe 


GET 2 BYTES OF DATA 
AND ADD BIAS TO IT 
IF IN REL MODE 


ASSEMBLE 1 wORD OR 
TWO BYTES OF DATA 
THTOQ REG O, 


AL106180 
4L106190 
AL106200 
AL106210 
AL1G6226 
ALi06230 
AL106240 
AL106259 
AL106260 
AL106270 
AL106286 
AL106299 
AL106300 
4L106316 
&4L106320 
AL106330 
AL106340 
4L106350 
AL1i06369 
AL106370 
AL106380 
AL106390 
AL106400 
AL106410 
AL106%20 
AL106436 
AL1064%40 
AL106450 
AL106460 
AL106470 
AL1064%890 
AL106490 
AL106500 
AL106510 
AL106520 
AL106530 
AL1G66540 
AL106550 
AL106560 
AL1G6570 
AL106580 
AL1065990 
AL106600 
AL1G6610 
AL106620 
AL106630 
AL1066490 
AL106650 
AL106660 
AL106670 
AL106680 
AL196690 
AL106706 
AL106710 
AL106720 


ari Se EE OREN OS ee ea 
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0726 
C728 


OT2A 
O72E 
0732 
O734 
O738 
O73C 
O7SE 


2038 
0302 


CCA4 
C4A0 
OB4Y9 
4311 
CcB4eO 
0A58 
0301 


0000 
0000 
0000 
o0u0od 


6340 
0548 
4230 
BE4O 
4240 
9043 
42F0 
DA4SD 
#240 
DEO 
4249 
QO7EE 
4OED 
40E0 
Q80E 


9043 
42FO 
SB43 
4240 
GATS 
§8A0 
4223 
2118 
C530 
2135 
40790 
4300 
GBAZ 
C4an 
DSAA 
O5SA 


0000 
OO0F 


o000 
oooc 


ocoe2 
COOA 
Q00E 
0008 


0078 
0760 
OBFC 
O74A 
0752 
OBFA 
6758 
o079 
6760 


ecac 
OCBE 


O774 
O77A 


ocac 
O7CE. 


OOFO 


ucac 
OT7T4 


OGOF 
8BE2 


674 
675 
676 
677 
678 
679 
686 
641 
682 
685 
684 


06=-194F01R01 
BN2S woORDL 
BR R2 

* 

ExTR SRHL ArO( BYTE) 
NHI AwX*Ft 
SHR BYTE +FOUR 
BNA O(R1i)} 
LHI BYTE .12 
AHR PICK.«TwO 
BR R1 

KKEKKEKERSE 

* 

* 

* INPUT ROUTINE 

* 

* READS EITHER 16/717 OR MOB/096 

* REDEFINE SOME REGISTERS 

RTN EGU R2 

ACL EQuU A 

CBA EQu E 

CRB EQU B 

* 

* CALL BAL RTNe INPUT 

INPUT L3 DEV «BINDV 
CLHR DEV-.TWO 
BNE IN1 
oc DEVsTWRT 
BTC et 2 
SSR DEV +DAT 
BTC 154*-2 
wD DEVsXON 
BTC Gg tol 

IN1 oc DEV +BINGV41 
BTC Heeny 
XHR CBA».CBA 
STH CBA+eCFLG 
STH C8A.BFLG 
LHR ZERO.CBA 

* 

READIT SSR DEV «DAT 
Btc 15,+READIT 
ROR DEV eDAT 
BTC Bee? 
WOR ONE sDAT 
LH AC1iaCFLS 
BP STORE 
BNS TESTS 
CLHI OGAT«X'FG! 
BENES TESTS 
STH ONE »CFLG 
B READIT 

TESTA LHR ACLeDAT 
NHI ACisiS 
LB ACisZTABL ACL) 
CLHR OAT+ACTI 
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EXTRACT ONE FOUR RIT 
BYTE FROM THE CATA 
IN REG Ae 


UPOATE PICK AND BYTE 


108-BYTE RECORD 


LINK REGISTER 


CUR BYTE ADRS POINTER 
TEMP STOR FOR BYTE ASHA 


FETCH INPUT DEV ADRS 
IF TTYe SELECT WRITE 


AND OUTPUT X-ON 
REPEAT IF FSYN 

AS SOON AS IT ISN#T 
BUSY 


REPEAT WRT IF FSYN. 
START DEVICE IN RFEAD- 
MODE (LOOP IF FSYN) 
INITIALIZE FLAGS 

AND BUFFER-INDEX 


LOOP ON BUSY 

STATUS 

READ A BYTE 

REPEAT IF FSYN 

SHOW DATA READ 

TEST C FLAG 

IF + ITS 16/17 FORMAT 


ELSE« WAIT & SEE 


ANO READ IN BUFFER 
OTHERWISE SEE IF 

LEGAL M08/09 CHAR 
FETCH TABLED-ENTRY 
AND IS IT = DATA? 


AL106730 
AL106740 
AL106750 
AL106760 
AL106770 
AL106780 
AL106790 
AL106800 
AL106810 
AL106820 
AL106830 
AL106840 
AL106850 
AL106860 
AL106870 
AL106880 
AL106890 
AL106900 
AL106910 
AL106920 
AL106930 
AL106940 
AL106950 
AL106960 
AL106970 
AL106980 
AL196990 
AL107000 
AL107010 
AL107020 
AL107030 
AL107040 
AL107050 
AL107060 
AL107070 
AL107080 
AL107090 
AL107100 
AL107110 
AL107120 
AL107130 
AL107140 
AL107150 
AL107160 
AL107170 
AL167180 
AL107196 
AL107200 
AL107210 
AL107220 
AL107230 
AL107240 
AL107250 
AL107260 
AL107270 


=~ 


( 
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O7A6 
O7AA 
O7AE 
o782 
O7B6 
Q786 
C7BC 
G7C8 
o7C4 
o7c8 
e7cc 
G7CE 
9702 
0704 
0708 
O7DC 
O7DE 
07E0 
O7E4 
O7TES 
O7EA 
O7EE 
O7TF2 
O7F6 


O7FS 


O7FA 
O7FE 
0862 
0806 
080A 
08oc 
O80E 
0812 
0816 
O81A 
O81E 
0820 
0824 
0826 


082A 
082c 
0830 
0834 
0836 
O83A 
083C 
0840 


&230 
4BAG 
4230 
4070 
0683 
COb0 
4060 
$300 
&G900 
C439 
0635 
D23eE 
QAET 
C5SE0 
4280 
0548 
6232 
DESO 
H2K9 
9DaS 
4&2F0 
BDA4G 
4240 
6302 


60656 
2411 
6110 
4810 
C410 
c510 
O23F 
2416 
6110 
510 
C#10 
c510 
C23F 
C610 
61106 
O30F 


g000 
0766 
C379 
cE7O 
9OT8 
GerD 
9679 
C590 
4330 


O774 
OCB8E 
o7C4 
OC&E 


G004 
8cé&C 
O77 
OC8E 
O00F 


LEG4 
oo6c 
0774 
OBFC 
O7EO 
O7ES 


OBFB 
O7EE 


G7F8 


0oC3& 
ocg9s 
O00F 
000A 


0c938 
0c98 
OOF O 
OGAD 


0060 
ocgé 


082A 


0078 
0079 


CE34 


0020 


0668 


729 
730 
734 
732 
733 
7S4 
735 
736 
737 
738 
739 
740 
741 
74#2 
743 
THe 
745 
THE 
T4T 
748 
74S 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
7ol 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
773 
780 
781 
782 
783 


G6-194F01R01 10:46:16 08/02/78 
BNE READIT IF NOTe IGNORE 
LH AC1,BFLG IF SO, TEST 8B FLAG 
BZ ASHB IF SET. THIS IS AN ODD 
STH ONE sBFLG HALF<8YTE SO ASSEMBLE 
LHR CRB DAT IF RESET:s SAVE EVEN= 
SLHL CRBs4% HALFeS8YTE AND SET 6B 
STH SEQNUM,CFLG IF LEGAL ZONESe SET C = 
B READIT 

ASMB STH ZEROsBFLG ON ODD-ITEMS, RESET 8B 
NHI BDAT+15 ANC ASSEMBLE A WHOLE 
OHR DAT+-CRB BYTE 

STORE STB DATsSUFF (CBA) PUT IY IN BUFFER 
SHR CBAsONE BUMP THE POINTER 
CLHI CBA,108 THRU YET??? 
BL READIT NOs GET SOME MORE 
CLHR DEV. TWO ELSE RETURN UNLESS 
BNER RTN ITS A TELETYPE. 
oc DEV,TWRT THEN 
BTC hg kwh WALT FOR A CHANCE 
SSR DEV.+DAaT AND SEND X-OFF 
BTC 15.#-2 
WD DEV. XOFF 
BTc Yeh 
BR RTN 

eKEEEKEE 

* THIS SURROUTINE INCREMENTS a DECIMAL COUNTER 

* 

INCADRS EQU * 
LIs Rlel 
AHM Ri-«DECADRS ADD ONE TO DECIMAL COUNT 
LH R21eVECADRS LOAD UPDATED ADDRESS 
NHI Ri sxX*F* MASK © 
CLHI RlaX*S?* EXCEED 197 
BNER Ris 
LIS R1s6 ADD DECIMAL FACTOR 
AHA Ri,DECADRS aot 6 TO MAKE DECIMAL 
LH Ri«DECADRS LOAD UPDATED ADORESS 
NHI R1X°FO! MASK OFF 
CLHI R1isX*AG* EXCEED 160 
BNER RIS NO RETURN 
LHI RiexX*"sod' ADD DECIMAL FACTGR 
BHM Ri,OCECADRS ADO 66 TO MAKE DECIMAL 
BR Ris RETURN 

x KEKE 

* THIS SUBROUTINE READS ONE BYTE FROM DATA TAPE AND 

* PUT IT In R6 

ROBYTE EQu * 

ROANSTUF XHR R62R6 ZERO OUT R6 
LB R7sX*78? LOAD ADDRESS OF TAPE READER 
oc R7eX*79! LOAD COMMAND BYTE OF READER 

ROASF SSR R7sR8 SENSE STATUS ON READER 
BTC i5sROASF IS IY CLEAR TO READ 
ROR R72R9 READ DATA 
CLHI k9eX*#20° 
BE SPECREAD 


ALi07280 
AL107290 
AL107309 
AL167310 
AL107329 
AL1073390 
AL107346 
ALIO7354 
AL107360 
AL167370 
AL107380 
AL107390 
AL107400 
AL107410 
AL19074%20 
AL107430 
AL107440 
AL10745a 
AL1074690 
AL107470 
AL1O7480 
AL107490 
AL1075900 
AL107510 
AL107520 
AL107530 
AL107540 
AL107550 
AL107560 
AL1607570 
41107586 
AL107590 
AL107600 
AL107610 
4L1607620 
AL107630 
AL107640 
AL107650 
AL107660 
AL107670 
AL107680 
AL107699 
AL1607700 
AL107719 
AL107729 
AL107739 
AL107740 
AL107750 
AL107760 
AL10777¢6 
AL107780 
4L107790 
AL107800 
AL107810 
AL1907820 
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06445 
0848 
D8GA 


U84E 
085¢ 
6854 
0858 
GB5A 
685C 
0860 
0862 
0864 


0868 
QB6A 
O846C 
O86E 
0870 
as7Te2 
0a74 
0876 
O87A 
O87C 
OB7E 


4810 
2133 
4300 
6000 
€590 
O28F 
C590 
21862 
2797 
C490 
9164 
0669 
#300 
0000 
2448 
G722 
9078 
26F1 
9673 
913F 
E20 
2741 
2037 
0862 
4300 


6090 
2440 
caso 
4045 
2752 
2213 
O3GF 


c85so0 
41F0Q 
c8io 
9501 
0307 


p00a 
D345 
41FO 
2740 
2333 
2651 
2207 


GC80 
0834 
US4E 
00308 


003A 


OOOF 


0834 
0868 


0001 


0486 


0882 


OFFE 
ae 


GEOC 
08A2 
&000 


LECc8 
0000 
baD4 


784 
785 
786 
787 
786 
789 
796 
791 
T92 
793 
794 
795 
796 
737 
798 
739 
800 
801 


O6-194FC1R01 


LH 
BNZS 
B 
RDOASF2 EQu 
CLHI 
BLR 
CLHI 
BLS 
SIS 
ROASFL NHI 
SLLS 
OHR 
B 
SPECREAD E£QU 
LIs 
XHR 
SPEC11 SSR 
BT38 
RuUR 
SLLS 
SiL 
SIS 
BNZS 
LHR 
B 
WRREKKEKE 


PAGE 


R1,.SORDFLSG 
RDASF2 
ROASF 

* 
R9eX*30° 
LINK 
RIeXtZAe 
RDASF1 
R97 
RIeX*F? 
R694 
R6&eRI 
RDASF 

* 

R4.8 
R2eR2 
R7eRE 
15e1 
R7eR3 
R3-15 
R21 
Ruel 
SPEC11 
RGeR2 
VERG 


16 


* THIS SUBROUTINE PUTS ZERO INTO 


* 

ZERRBF EQu 
LIs 
LHI 

RBZER STH 
SIS 
BNMS 
BR 

SORE EK 


* 

R40 
RSeX*FFE? 
R4sROMBFR(RS) 
R5<2 

RBZER 

LINK 


10246316 08/02/78 


IS IT VALID ASCII 
RETURN 
IS IT GREATER THAN 9 


ADJUST CHARACTER 


MASK OFF LOWER ORDER DIGIT 
SHIFT OVER FOR COMBINATION WITH NEXT 


OR IN NEXT CHARACTER 


ROM BUFFER 


INIT R4& 

LIMIT 

ZERO INTO BUFFER 
DECREMENT 

IF NOT DONE CO AGAIN 
RETURN 


% THIS SUBROUTINE PUTS TOGETHER SOME COMMONLY USED PRINT 


* SEQUENCES 
* 


EXEC LHI 
BAL 
LHI 
EPSR 
BR 

x~— = ee ee ee 


R5eMSG52 
LINK «PRINT 
R1+X*3000' 
RO«R2 


* THIS SUBROUTINE IS USES 
* TO PRINT THE ASCII MESSAGE 


* 
PRINT STM 
PRINT2 L383 
BAL 
SIS 
BZS 
AIS 
BS 


ROsRSAVE 
R4,0¢€R5) 
LINK »QUTCHR 
R413 
PRINTS 

RSel 

PRINT2 


HIT EXEC RUN 
PRINT IT 

HALT PROCESSOR 
ACTIVATE 
RETURN 


STORE REGISTERS 
SET A MESSAGE BYTF 


LOOP FOR NEXT CHAR 


AL107830 
AL107840 
AL107850 
AL107860 
AL107870 
AL107880 
AL107890 
AL107900 
AL107910 
AL107920 
AL107930 
AL107940 
AL107950 
AL107960 
AL107970 
AL107989 
AL107990 
AL10a8000 
AL108010 
AL108020 
AL108030 
AL1098040 
AL108050 
AL108060 
AL108070 
AL108080 
AL108090 
AL108100 
AL108110 
AL108120 


_ AL108130 


AL108140 
4.108150 
AL108160 
AL108170 
AL108180 
AL108190 
AL108206 
&L108210 
AL4t08220 
AL108230 
AL108240 
AL108250 
&L108260 
AL108270 
AL108280 
AL108290 
AL108360 
AL108319 
AL108320 
AL108339 
AL108340 
AL108356 
AL108360 
ALi08370 


aaa 


vane 


( 
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08B6 
0888 
03BC 
O8BE 
08c0 
08c4 
O8CE 
$8c8 
GBCA 
C&ceE 
08b2 


08n4 
0408 
O8DC 
08DE 
O8E2 


S8E6 
O8EA 
O8EC 
O8EE 
O8Fe2 
C8F4 
G8FS& 
O8FA 
O8FE 
0902 
6904 
0908 
OS0A 
O9GC 
0910 
0914 


0918 
e31c 
O91E 
0920 
c922 
0924 
0928 
G92A 


092C 
0930 


0932 
0936 
6938 
O93A 


2454 
D319 
2713 
2335 
41F9O 
2541 
2392 
2441 
41F9 
D100 
O30F 


4OF9 
0300 
e704 
4239 
4000 
b005 
D300 
SDa1 
2386 
4810 
2036 
4300 
9601 
C410 
CB1i0 
2134 
4010 
2308 
2712 
#230 
SOFO 
4300 
0000 
4116 
9001 
2137 
2082 
SAQ4 
bod0 
2132 
2083 
0000 
4300 
0000 


4149 
3004 
O21F 
2082 


1Ecs 


Day 


0804 
1Ecé 


O92E 
1ECS 


0916 
0936 
G8E6 
GC76 
9939 
0916 


OO07F 
6012 


0930 
O8E6 
0930 
O8E6 


0918 
O9BC 


0CB3 


092C 
092C 


0996 


839 
840 
641 
a42 
843 
a44 
645 
546 
E47 
546 
849 
850 
651 
852 
853 
654 
855 
é56 
857 
858 
853 
560 
861 
862 
863 
664 
865 
866 
867 
568 
B69 
870 
a7i 
&72 
373 
E74 
575 
8&T6 
877 
578 
879 
680 
681 
682 
883 
684 
683 
886 
887 
888 
689 
890 
891 
892 
893 


56-194F01R01 


PRINTS LIS R4,10 

LB Ri, TOSAVE+1 

SIS Ries 

BZS PRINTSA 

BAL LINK sOUTCHR 

LCS R4yi 

as PRINT3B 
PRINT3A LIS R4el 
PRINTSB BAL LINK,QUTCHR 
PRINTS LM ROeRSAVE 


OUTCHR STH R15,0UTL2+2 
LB ROsTOSAVE+1 
SIs RO4 
BNZ OUTCHR2 
STH RO«PAUSE 


OTC.8 Eau * 
LB RO+CONADR 
SSR ROeRL 


BFFS 6,0TC.2 
OTC.1 LH R1isPAUSE 
BNZS OTC.S 
B QUTCHR2 
OTC.2 ROR ROeRL 
NHI R1eX*7F* 
SHI RiexXt1l2! 
BNZS OTC.3 
STH R1i+sPAUSE 
BS CUTCHR2 
oTc.3 SIs R12 


BNZ OTC.0 
STH LINKsPAUSE 
& oTc.d 


OUTCHR2 EFGU * 
BAL RisSETUP 
SSR RO«ekK1 
BTFS 3:0UTO 


BTBS 6:2 
HOR ROeR4 
OTC .4 SS RO.SINK 


BTFS 3+0UTO 
BT8S 8-.0TC.4 


GUTS ESU * 
OUTi2 8 * 
PAUSE pcx 0 
FEKEEEKS 


* THIS SUBROUTINE IS USED 


* TO GET A CHAR FROM KEYBOARD CIN 


* 
GETCHR BAL R4YeKBREAD 


SSR ROWR4A- 
BICR 1+LINK 
BTBS 82 


19:46:16 08/02/78 


BRANCH IF YES 


YES OUTPUT X*90i" 
TERMINAL CHARACTER 


SAVE RETURN ADDRESS 


BRANCH IF NO 
RESET FLAG 


CHAR TO READ? 
BRANCH IF YES 
PAUSED? 

BRANCH YES WAIT FOR DC2 
DCT.,OCK(FDX ONLY) 
oc 2 

RESET FLAG 

DC 4? 

NO 

RESET FLAG 

AND wAIT FOR DC 2 
SET UP FOR PUTPUT 
WAIT FOR NOT BUSY 
B 


OUT PUT DATA BTYE 


REG R4) - 
PUY KB DEv INTO READ MODE 


IF OU RETURN 
IF BUSY LOOP 


AL1083580 
AL108390 
AL108406 
AL108410 
ALi108420 


AL108430 


AL108440 
AL108456 
AL168460 
AL108470 
AL108490 
AL198500 
AL108510 
AL108520 
AL108530 
AL108540 
AL16a550 
AL108560 
AL108570 
AL1085860 
AL106590 
AL10a600 
AL108610 
AL108620 
AL108630 
AL108640 
AL108650 
AL108660 
AL108670 
AL1086680 
AL168690 
4&L108700 
AL108710 
AL10a720 
AL108730 
AL108740 
AL1086759 
AL108760 
AL108770 
AL108780 
AL108790 
AL108800 
AL108810 
4L108820 
AL108830 
AL106540 
AL108850 
AL108860 
AL1¢08679 
AL108889 
AL108890 
4.108900 
AL1089106 
AL108920 
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o93sc 
O93E 
0942 
0946 
93948 
o94C 
a3so 
03952 
0954 
o95a 
O95C 
OS9S5E 
0962 
0364 
0968 
S96A 
096E 


o9T72 
0976 
a9TA 
O97E 
0982 
09864 
0988 


e9ac 
0990 
9994 


0996 
B9SA 
O99E 
G9A2 
v9A4 
O9A8 
OFAC 


O9AE 
o9Be 
O9B4 
0986 
O9BA 


9604 
D390 
C5390 
2137 
5390 
0D90 
2082 
9ASY 
C440 
4600 
O23F 
D000 
2440 
S1F0 
244) 
41FO 
4300 


41F0 
4OFO 
C850 
&1FO 
0700 
4000 
41FO 
0000 
Caso 
41Fo 
O30E 


D300 
DESO 
4830 
6334 
DBO 
DESO 
0304 


D360 
9419 
8610 
40190 
O30F 


CC6E 
OCA 


oc7? 
ocB3 


OOTF 
0C96 


1EC8 
0aDs 


0804 
O8BE 


O95E 
ocgc 
OD1A 
08A2 


ocsc 
095E 
o9ac 
002A 
o6D4 


GC76é 
OC6E 
oc70 


0CBS 
OCBE 


6100 


1EC4% 


694 
895 
696 
897 
698 
899 
906 
901 
902 
903 
904 
905 
906 
907 
908 
909 
9190 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
93u 
931 
932 
933 
934 
935 
936 
937 
938 
339 
S4y 
941 
S42 
343 
944 
945 
946 
Su? 
948 


06=194F01R01 


ECHO LB 


ECHRTN NHI 


CRLF STM 


RORY 
R9.,CONRD 
R9eX*A9! 
ECHRTWN 
RIeCONADR+1 
R9-eSINK 

Bee 

R9eR4 
R4eX*7F® 
RO.sNOCRLFE 
LINK 
RORSAVE 
R4e13 

LINK .«QUTCHR 
R4el3 

LINK. OUTCHR 
PRINTS 


* THIS SUBROUTINE IS USED 


PAGE 


* TO OUTPUT *?* TO CONSOLE 
x 
QUESTN BAL LINK »CRLF 
STH RiSsISITERR 
LHI R5-+QMSG 
BAL LINK sPRINT 
XHR RO.ROG 
STH ROsISITERR 
BAL LINK.CRLF 
ASTSK EQU * 
LHI RG aXt2at 
BAL LINK »OUTCHR 
BR R1i4 
here wr wena wwe eer are eee ew ee 


* THIS SUBROUTINE IS USED 
* TO PUT KEYBGARD DEVICE IN READ MODE 


* 
KBREAD LB 
TTYGET BZR 
CRIGET RD 


BR 
IE KK 


ROeCONADR 
RO.sCONRD 
R3.PASFLG 
RY 

RO,sSINK 
ROeCONRG2S 
RY 


10246:16 08/02/78 
READ CHARACTER IN R¥# 


CAROUSEL? 
NQ BDO NOT ECHO 


ECHO RECEIVED BYTF 
REMOVE PARITY 

TEST NOCRLF FLAG 
IF NOT ZERO RETURN 
STORE REGISTERS 


OUTPUT CR 


CARRIAGE RETURN 
OUTPUT IT 


PRINT *7° 


SPACE 


ASTERISK 
QUTPUT A CHARACTER 
RETURN 


PASLA? 
RETURN 
DUMBY READ 


RETURN 


* THIS SUBROUTINE IS USED TO DIRECT I70 TO CONSOLE 


* 
SETKB LB 


RO,10 
Ri¢kO 
R1i,RO 
R1+eIOSAVE 
LINK 


* THIS SUBROUTINE IS USED 
* LIST DEVICE SET UP ROUTINE 


* 


KB=LIST 
RETURN 


AL108930 
AL108940 
AL108950 
AL108960 
AL108970 
AL168980 
AL108990 
AL109000 
AL109010 
AL109020 
AL109030 
ALi09040 
AL109050 
AL109060 
AL109070 
AL109080 
AL109090 
AL109100 
AL109110 
AL109120 
AL109130 
AL109140 
AL109150 
AL109160 
AL109170 
AL109180 
AL109190 
AL109200 
AL109210 
AL109220 
AL109230 
AL109240 
AL109250 
AL109266 
AL109270 
AL109280 
AL109290 
AL109300 
AL109310 
AL109320 
AL109330 
AL109340 
AL109350 
AL109360 
AL169370 
AL109380 
AL109390 
AL109400 
AL109410 
AL109420 
AL109430 
AL109440 
AL109450 
AL109460 
AL109470 


awe 
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09BC 
o9c0 
o9Ce2 
09Ccé 
69c8 
O9CA 
ogcc 
O9CE 
09D0 
0904 
0908 
63DC 
O9DE 
09£2 
OSE6 
O9E8 
O9EC 
09F0 
O9F2 
O9F6 
O9FA 


OSFC 


GAs 
QA04 
0A08 
OAC 


QA10 
0A12 
OA14 
OA16 


OA18 
OAIC 
QA20 


CA22 
OA26 
OA2E 
QA2C 
OA2ZE 


D300 
2701 
4330 
2701 
2336 
2701 
233E 
2701 
4339 
D300 
OEGG 
6301 
0300 
DEOO 
03902 
D300 
DESO 
0301 
D300 
DEOS 
0301 


4300 
4300 
4300 
4300 


SD4C 
20F1 
DA4S 
0308 


0000 
0340 
DEO 
0306 


0000 
C8190 
0733 
4160 
2711 
2213 


1EC5 


OSDE 


O9F2 
0105 


arn 


oceD 


0103 
0cé69 


0106 
OCA8 


0103 


OC6b 


0108 
0198 
0108 
8108 


OAL& 
GO7A 
CO75 


OA2Z2 
00C& 


0A10 


949 
950 
951 
952 
953 
954 
955 
956 
357 
958 
359 
960 
961 
962 
963 
964 
965 
366 
967 
968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 
988 
$89 
990 
991 
992 
993 
994 
995 
996 
397 
998 
999 

1600 

1001 

1002 

1003 


O6-194F G1R01 


SETUP LB 
SIs 
B2 


TTYORV LB 


CRTORV L8 


LPDRY LB 


CARDRY LB 


* 
ORS 
¥EKKECESE 


RO, IOSAVE+1 
RO 

CRIORV 

ROel 

TTYORV 

RO 

LPORV 

ROel 

CARORV 
RO«CLIFADR+1i 
RO-«CLIFART 
RI 
RO«PASLADR+1 
ROeCRIWRT 

R1 

ROeLPAOR 
ROeLPWRT 

Ri 
ROePASLADR+1 
RO«CARWRT 

R1 


x*AgOo' 
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GET LIST DEVICE IDENTIFIER 
YES GO TO CRT DRIVER 


YES GO To TTy ORIVER 


YES GO TO CAROUSEL ORIVER 


* THIS MUST RESIDE AT X*AGO*%=xK"A1N* FOR PURPOSE OF 
* COMPATABILITY OF STARTING ADDRESSES 


* 


ORIGINI B 
ORIGIN2 B 
ORIGINS 8 
ORIGINS 6 
KEKEESE 


STARTL 
STARTL 
STARTI 
STARTL 


* THIS SUBROUTINE OUTPUTS A CHARACTER 
* TO THE PUNCH DEVICE 


* 

OuTI SSR 
BTBS 
WOR 
BR 

KEKSEEKKESX 


DEVsR12 
15el 
DEV+R3S 
LINKS 


* THIS SUBROUTINE SETS UP THE PUNCH DEVICE 


* 
SETUPS Eau 
L3 
oc 
BR 
x KEKE 


* 
RGeX* 7A! 
R4ekK"7B? 
LINKS 


LOAD ADDRESS OF PUNCH 
OUTPUT COMMAND FOR PUNCH 


* THIS SUBROUTINE PUNCHES 200 FRAMES OF ZERO 


* 

PLEAGER EQU 
LHI 
XHR 

LEADER? BAL 
SIs 


BNAS 


* 

R1.209 
R3.R3 
LINK3,.OUT1 
R11 
LEADER 


200 COUNT FOR # OF ZEROES IN LEADFR 


AL109489 
AL109490 
AL109500 
AL109510 
ALi¢9520 
AL109530 
AL1095460 
AL109559 
AL109560 
AL109570 
AL109566 
4.109590 
AL109600 
AL109610 
AL199620 
4L109630 
AL109646 
AiL109659 
AL109660 
ALi09670 
AL109680 
AL109699 
AL109700 
AL109710 
ALi09726 
AL109730 
AL159740 
4L109750 
AL109760 
AL109770 
AL109780 
AL109790 
AL109600 
AL109810 
AL109820 
4L109830 
AL109840 
41169850 
AL109860 
4.169870 
AL169880 
AL109890 
AL109900 
AL109910 
AL109320 
41109930 
4L109940 
AL1909950 
AL109960 
4.109970 
4L1699860 
AL169990 
&L110000 
AL110010 
AL110020 
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CA30 


QAZ2 
0A36 
DASA 
OASC 
0A4O 
0A42 


GAG 
DAYS 
DAGA 
OAGE 
OAS2 
QA54 
QA56 
OASA 
OA5E 
0AG62 
QAG4 
OAGS 
GAEC 
OQA6E 
OA72 
OAT4 
OATS 
OATC 
CATE 
CAB2 
0A86 
OASA 
oAac 
0AS0 
0A94 
DA96 
0A98 
OA9C 
QAAD 
GAAS 
OAAS 
OAAA 
OAAE 
OABO 
GABY 
OABS 
SABC 
QABE 
gAce 
QACS 
DAC6 


0307 


0000 
G335 
C530 
O33F 
4180 
2651 
2208 


0000 
CTEE 
4OE0 
C880 
4080 
O777 
2404 
4810 
C827 
41FC 
2674 
C840 
D247 
2671 
D30A 
26A2 
C817 
41FO 
2678 
41FoO 
4610 
4330 
O700 
D340 
D24eE 
2661 
2601 
c5o0 
$230 
C840 
D2eeE 
26E1 
864d 
2641 
4640 
C540 
4239 
2440 
D24E 
26E1 
244A 
Dé4E 


CA3Z2 
3o0c 
OOFF 


GALLO 


DA44 


OCc72 
0010 
cCcT4 


0c98 
3C34 
0818 


2020 
6C34 


GER 


uc34 
0B40 


O7F8 
cco4 
DADC 


0Cc34 
1E44 


0006 
GABC 
2020 
1E44 


oc7ve 
oc7ve 
o004% 
OADC 


LE44 


LE44 


1004 
1005 
1066 
1007 
1668 
1009 
1610 
1611 
1o12 
1013 
1014 
1615 
1016 
1617 
1618 
1619 
1020 
lu2l 
1022 
1623 
1024 
1625 
1026 
1027 
1026 
1029 
1030 
1031 
1032 
1633 
1034 
1035 
1036 
1037 
1638 
1049 
1040 
1641 
1042 
1043 
LO44 
1645 
1046 
1047 
1648 
1649 


BR 
* KEKREKE 


* THIS SUBROUTINE PUNCHES A LINE OF DATA UNTIL AN X*FF* ITS ENCOUNTERED 


* 

PUNCH EQU 

LDANTHER LB 
CLHI 
BER 
BAL 
AIS 
BS 


* THIS ROUTINE LISTS 


* 

DYNPNLST Eau 
XHR 
STH 


SPEC1 XHR 


SPEC2 LB 


PAGE 


LINK2 


* 

R3eO(RS) 
R3:X*FF®* 
LINK 
LINK3:OUT1 
R5el 
LOANTHER 


* 

R1L4eR1L4 
R14-SPECOUNT 
RGe16 
R&sSPECNT 

R7 RT 

RO+4 
R1.«DECADRS 

R2 sLNTOBPRT(R7} 
R1S5,HEXASC 
R704 

R4 eX" 2920" 

RS stLNTOBPRT(R7} 
R71 
ROe«ROMBFR(R10)} 
R1092 
R1sLNTOBPRT(R7) 
R1S+BYCON 
R78 
R15-eINCADRS 
RieLSTFLG 
SPECS 

R13,R13 

R4 LNTOBPRT(R13) 
R4 »BQUFF(RiI4) 
Ri¢sl1 

Ri3de1 

R13+13 

SPEC2 
R4.X*2020° 

RG BUFF IRI4G) 
R141 
R4.,SPECOUNT 
Rei 

RG eSPECOUNT 
Roe 

SPECS 

R413 

R4 «BUFF (R14) 
Riel 

R4-i0 
R4¥,B8UFF(R14) 


20 
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END CHARACTER YET 


AND PUNCHES THE SPECTRUM DYNAMICS FORMAT 


ZERO OUT COUNT 


ZERO OUT INDEX 

4 DIGITS TO CONVERT 
DATA TO CONVERT 
DESTINATION 

00 CONVERT 
INCREMENT 

LOAD SPACE 

STORE IN MESSAGE 
INCREMENT 

LOAD DATA BYTE 
INCREMENT 
DESTINATION 

EXPAND AND PLACE 
INCREMENT 

INCREMENT DECIMAL ADDRESS 
DO WE LIST 

NO SKIP 

ZERO OUT COUNTER 
LOAD BYTE 

STORE BYTE 
INCREMENT 

INCREMENT 

ARE WE FINISHED 

NO GO AGAIN 

LOAD SPACE 

STUFF INTO OUTPUT BUFFER 
INCREMENT 


NO GO AGAIN 


STUFF INTO BUFFER 


AL110030 
AL110040 
AL110050 
AL110060 
AL110070 
AL110060 
AL110090 
AL110100 
AL110110 
AL110120 
AL110130 
AL110140 
&L110150 
AL110160 
AL1101706 
AL110180 
AL110190 
AL110200 
AL110216 
AL110220 
AL110230 
AL110246 
AL110250 
AL110260 
AL110270 
AL110280 
AL110290 
&L110300 
AL110310 
AL110320 
AL110330 
AL110340 
4L110350 
AL110360 
AL110370 
AL110380 
AL110390 
AL110400 
AL110410 
AL110420 
AL110430 
AL110440 
AL110450 
4L110460 
AL110470 
AL110460 
AL116490 
AL1i10506 
AL110510 
4L110520 
AL110530 
AL110540 
AL110550 
AL1109560 
AL116570 


ae 
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SACA 
QACC 
DADO 
GAD4 
0AD8 
gAQac 
SADE 
GAES 
GAE4 
QAEG 
OAEA 
QAEC 
OAEE 
OAF2 
OAFE 
QOAFA 
OAFE 
oBae 
0806 
OBOA 
OBOC 
0810 
oB1i4 


0B18 
681C 
OB1E 
0826 
oB22 
0B24 
0828 
oBec 
0B30 
0834 
0836 
0838 
OB3A 
OBSE 


0840 
OB44y 
OB46 
CB4e 
OB4A 
6B4C 


O7EE 
4OE0 
4110 
C85G 
S1FO 
2445 
G24? 
2671 
244A 
C247 
2671 
23541 
0247 
4810 
43390 
4186 
C850 
41FO 
&B8D 
2761 
4080 
4230 
4300 


0000 
D000 
0336 
91352 
2754 
G84) 
CC43 
C440 
0344 
De42 
2621 
2734 
2218 
6100 
G30F 


0060 
0000 
2457 
0830 
9138 
0722 
E020 


oc72 
e9Bc 
LE4S4 
o6A2 


OC34& 


OC34 


0C34 
OC9A 
0806 
GCA18 
0C34 
GA32 
oc74 


Oc74 
dA52 
O3A4 


0B18 
1€¢8 


8000 
OOOF 
oBFE 
0090 


1EC6 


0B49 
1EC8& 


0001 


1659 
1060 
1661 
1062 
1063 
1064 
1065 
1066 
1667 
1068 
1669 
1670 
1¢71 
1672 
1073 
1674 
1675 
1076 
1077 
1678 
1079 
1080 
1081 
1082 
1083 
1684 
10685 
1066 
1087 
1688 
1689 
1090 
1631 
1692 
1093 
1094 
1695 
1696 
1097 
1698 
1699 
1100 
1101 
1102 


1103 


1104 
1105 
1106 
11937 
1108 
1109 
1110 
1111 
1112 
1113 


SPECS 


SPEC4 


( 


PAGE 


R1i4¢,.R1i4 
R1i4,SPECOUNT 
R1,SETUP 
R5,8UFF 
R15-.PRINT 
R4,13 
R&eLNTOBPRT(R7)} 
R7ei 

R4,156 
R4sLNTOBPRT(R7} 
R7el 

R4el 

R4& eLNTOBPRT(R7) 
R1i.TAPFLG 
SPECS 
LINK3,.SETUP2 
R5SeLNTOBPRT 
R15.PUNCH 

R& e¢SPECNT 

RBal 

R&,SPECNT 
SPECI 

INCBOTH 


106246:16 98/02/78 


ZERO OUT COUNTER 


SET UP LIST 
START ADDRESS 
PRINT IT 


Load END CHARACTER 
STORE INTO LINE BUFFER 
DO WE PUNCH TAPE 

NS SKIP 

SET UP PUNCH 

START ADDRESS OF RUFFER 
PUNCH IT 


YES INCREMENT BOTH 


THIS SUBROUTINE CONVERTS HEX DATA TO ASCII 
NUMBER OF DIGITS TO CONVERT 


* 

* RO 
* Rl 
* RO 
* 

H 


HEXASC1 


DATA TO BE CONVERTED 
ADDRESS OF DESTINATION 


EQU 
ST 
LDAR 
SLLS 


BR 


x 
ROeRSAVE 
R3eRO 
R32 
R3.4 
R4eR1 
R4sO0(R3) 
R4.15 
R4.ASC( RG} 
R4.O0(R2) 
Reel 
R304 
HEXASC1 
ROwRSAVE 
Litik 


SAVE REGISTERS 


LOAD NUMBER OF DIGITS TO BE CONVERTED 


ADJUST 

DECREMENT 

LOAD DATA TO BE CONVERTED 
ADJUST DATA 

MASK OFF LAST OIGIT 
CONVERT TO ASCII 
STORE TO DESTINATION 
INCREMENT 

DECREMENT 

GO AGAIN 

RESTORE REGISTERS 
RETURN 


THIS SUBROUTINE EXPANDS A BYTE INTO 8 BITS 
WITH EACH BIT REPRESENTED IN ASCII DATA 


¢ 

* 

* RO 
* R1 
* 

B 


BYCOnNA 


DATA TO BE CONVERTED 


DESTINATION ADDRESS 


Eau 
STM 
LIS 
LHR 
SLLS 
XHR 
SLL 


* 
RORSAVE 
R5.7 
R3eRO 
R3.8 
R2eR2 
R2e1 


SAVE REGISTERS 

LOAD UP COUNTER 

LOAD DATA BYTE 

ADJUST DATA BYTE TO TOP OF R3 
ZERO OUT R2 

SHIFT TOP BIT OF R3 INTO R2 


AL110580 
AL110590 
AL110600 
AL110610 
ALi10620 
AL110630 
AL1106480 
AL110656 
AL11066690 
AL110670 
AL116660 
AL110690 
AL110700 
AL110710 
AL110720 
AL110730 
AL110740 
AL110750 
AL110760 
AL110770 
AL110780 
AL110790 
AL110800 
AL1i10610 
AL110820 
AL116836 
&L110840 
&L110850 
AL110860 
AL110876 
AL110660 
AL110890 
AL110906 
AL110919 
AL110920 
AL110930 
AL110940 
AL110950 
AL110960 
AL110970 
AL116980 
AL110990 
AL1110006 
AL1i11010 
AC1i11626 
4L111030 
4L111040 
AL111050 
AL111060 
AL111070 
AL111080 
AL111090 
AL111100 
AL111110 
AL111120 
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0850 
0854 
0858 
OB5A 
OBSC 
OB5E 
0Bé2 


0322 
0221 
2611 
2751 
2219 
D100 
O30F 


0000 
C810 
4010 
0856 
9054 
D355 
0256 
0656 
c45a 
0355 
0250 
085C 
9054 
0355 
C250 
oa5C 
cs50 
0355 
D250 
2421 
caio 
3501 
4020 
4020 
C856 
41FO 


c850 
41F0 
41F0 
4300 
C&50 
41FO 
41FO 
4300 


30B1 
Bass 
B435 
3687 
B&39 
9084 


OBFE 
6000 


1EC8 


0664 
3035 
o0D0Cc 


OBFE 
CE2E 


GOOF 
OBFE 
OE2F 


OBFE 
SE4O 


OOOF 
OBFE 
DE41 


OOFO 


Ocgac 
OCSE 
6DG4 
08A2 


OE2A 
0642 
OS5E 
04DC 
0694 
06A2 
O9SE 
01ce2 


8283 ° 


1114 
1115 
1116 
1117 
1118 
1119 
1129 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1125 
1130 
1131 
1132 
1133 
1154 
1135 
1136 
1337 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1158 
1359 
1160 
1161 
1162 


1163 
1164 


06-194FO01R01 


LB 
S$T3 
Ars 
SIS 
BNAS 
LM 
BR 
PEKEKEEES 


R2<ASC(R2) 
R2e0{R1) 
R1lei 

R5el 
BYCON1 
ROeRSAVE 
LINK 


* ERROR ROUTINES 


* 
EROS Eau 


ERRCOM LHI 


ERR1 Lit 


PNG LHI 


8 


* 

R1.cC*05* 
RieERRNO 
R5.R6 

R564 
R35eASC{R5) 
R5.4S8558 
R5eR6 
R5.15 
RSeASC(RS)} 
R5e4SG658+1 
R5,rR12 
R5e4 
R5eASC(RS) 
R5eMS658.1 
RS,R12] 
R5.15 
R5.ASCCRS) 
R5.4SG658.141 
R2el 
RieX*For 
ROeRL 
R2<ISITERR 
R2.NOERR 
R5<ERRMSG 
LINK ePRINT 


ASe4SG57 
LINK sPRINT 
LINK «CRLF 
TSTEND 
R5e4SG9 
LINK »PRINT 
LINK CRLF 
STTTST 


* DATA CONSTANTS 


ALIGN 


ZTAB oc 
oc 


8 


PAGE 
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CONVERT TO ASCII 
STORE INTO MESSAGE 
INCREMENT 

DECREMENT 

GO AGAIN 

RESTORE REGISTERS 
RETURN 


LOAD 5 

STORE FOR ERROR PRINT 
LOAD INTO WORK 

FIRST OIGIT 

CONVERT TO ASCII 

SET UP MESSAGE 

LOAD INTO WORK 


CONVERT TO ASCII 
SET UP MESSAGE 


SET UP 


DISABLE INT. @ PROCESSOR LEVEL 
SET ERROR FLAG 


PRINT "ERROR TIYNN® 

TT = TEST #e NN = ERROR & 
WAS SHOULD BE 

PRINT IT 

CARRIAGE RETURN LINE LEED 


X*3GB1"eX*B233%eX*R435* eX" 356B7"*sX*BA3S9S 


X*908i° 
x*8283' 


AL111130 
AL111140 
AL111150 
AL111160 
AL111170 
AL111180 
AL111190 
AL111200 
AL111210 
AL111220 
AL111230 
AL111240 
AL111250 
AL111260 
AL111270 
AL111260 
AL111290 
AL111300 
AL111310 
AL111320 
AL111330 
AL111340 
AL111350 
AL121360 
AL111370 
AL111380 
AL111390 
AL111400 
AL111410 
AL111420 
AL111930 
AL112440 
AL111450 
AL111460 
AL111970 
AL111480 
AL111490 
AL111500 
AL111510 
AL111520 
AL111530 
AL111546 
AL111550 
AL111560 
AL111570 
AL111560 
AL111590 
AL111600 
AL111610 


AL111620 
AL111630 


( 
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OBF6 
OBES 
GBEA 
OBEC 
OBEE 
OBFO 
obF2 


OBF4 
OBF6 
OBFS 
OBFA 


GBFC 


OBFE 
0cagé 
OCOE 
6C10 
oCi2 
0C14 
GCi6 
0c18 
OC1A 
ocic 
oOcie 
GC2A 
ocac 
GC2E 
6C34 
0C6é6 
0Cé6s 


GC6A 
oce6c 


OC6E 
0c70 
oc72 
oc74 
OC7é 
oc7a 
OCTA 
oc7c 
OC7E 
ocao 
0ce2 
OC8s 
0C86 
ocss 
OCBA 
ocac 
OCaE 
oc90 


8495 
9697 
9899 
9AIB 
9C90 
9ESF 
AUAY 
0006 
L4FF 
6080 
0000 
9193 
0909 
JBA4 
0060 
3031 
3839 
OcAg 
AQAO 
AOAD 
ADAO 
8DOA 
8DOA 
20A0 
0080 


ODOA 
12FF 
2026 


FFFF 
B9AB 
0000 
ASAB 
0000 
A4DS 
0000 
0000 
0000 
ooua 
Goo0 
0090 
0009 
C000 
0000 
0000 
0000 
0000 
c090 
0000 
0000 
0090 
0000 
coo 
0000 


GBFS 


OBFB 
OBFD 


3233 
4142 


2020 


OC6S 
OC6B 


oce6d 


3435 3637 
4344 4546 


2020 


1165 
1166 
1167 
1168 
1163 
1i70 
1171 
1172 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 


1181 


1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1390 
1191 
1192 
11493 
1194 
1195 
1196 
1197 
1198 
ites 
1200 
1201 
i2b2 
1203 
1294 
1205 
1206 
1207 
1208 
1209 
1210 
1221 
1212 
1213 
1214 


% 


B6-1L94FOIROL 


FEED 
TSTP 
TAPOFF 
Loc 


XON 
XOFF 
TwRT 
TREAD 
ASC 


FFCR 


CRLF2 
BLANK2 
BIAS 
PARTNO 


LNTOADR 
LNTOBPRT 


CRTRO 
CRIKRT 
CARRD 
CARWRT 
CLIFRD 
CLIFWRT 
CONRS 
PASFLG 
SPECOUNT 
SPECNT 
CONADR 
CONTBYT 
STRTIOFLN 
ROACOUNT 
XITFLG 
SORDFLG 
SPECFLG 
PTOP 

REF 

DEF 

LOCX 
CFLG 
BFLG 
STPFLG 


( 
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X*'aug5e 

X'9697! 

X*'5ag99? 

X*SA9B* 

X*9C9D° 

X*9SEGF® 

X*ADAS? 

FEED+i 

X*1L4FF* 

x'aor 

a 

X*91938 

XONA41 

X*OBAYP 

THRT+1 
C*Q12345676S9ABCDEF * 


X*GCAG*sX*AGAD* eX*AGAD eX*ADADAX* BDA 


x*8D0A® ’ 
X*20A0! 


CRTRD+1 
ASAB 
CARRO+1 
A4D8 
CLIFRD+1 


eonmMmovwaoaqQnnronoxKnoooaonna 
2 
oO 
Sool 


AL111640 
AL111650 
AL111660 
AL111670 
AL111660 
AL111690 
AL111700 
AL111710 
AL111720 
AL111730 
AL111740 
AL111756 
AL111766 
AL1117706 
41111780 
AL111790 


AL111800 


AL111810 
AL111820 
AL111830 
AL111840 
AL111850 
AL111860 
AL111870 
AL111880 
AL111890 
AL111900 
AL111910 
AL111920 
AL111930 
AL111940 
AL111950 
AL111960 
AL111970 
AL111980 
AL111990 
AL112000 
ALi12010 
AL112020 
AL112030 
AL112040 
AL112050 
AL112060 
AL112070 
AL112080 
AL112090 
AL112100 
AL112110 
AL112120 
AL112130 
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ocge 
oc9o% 
ocg96é 
0cs6 
OC9A 
ocsc 
OC9E 
OCAD 
OCA2 
OCA 
oCas 
OCAG 
OCA7 
GCAs 
OCA? 
OCAA 
OCAB 
ocac 
OCAD 
OCAE 
OCAF 
ocsBo 
oca2 
oCBS 
OcB4 
ocas 
OCB6 
ocBs 
occo 
occa 
econo 
ocDea 
OCcEO 
OcEe2 
Oce4 


OCEC . 


GCcr4 
OcFC 
oD02 
oD04 
obac 
ODO0E 


0010 
0016 
QD1A 
op1c 
0024 
oD2ac 
DD2E 
00306 
0038 
S049 
SD48 


00090 
0000 
0000 
o000 


5249 
414C 
4F5e 
5241 
3934 


4T4E 
4F52 
4943 
4154 


S24F 


6003 
ODGC 
2045 


4543 
2056 


B143 
4354 
4O4E 
5220 


4553 
4F20 
5426 
4D20 
4630 


4554 
2044 
5520 
3F20 


5220 


5252 


4946 
4552 


4520 
2054 
2052 


1215 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1228 
1229 
1230 
1231 
1232 
1253 
1234 
1235 
1256 
1237 
1238 
1239 
12490 
1241 
1242 


1243 
1244 


1245 
1246 


1247 
1248 
1249 


1250 
1251 


1252 
1253 


06-194F01R01 
NTAPES Bc 
LSTFLG oc 
NOCRLF oc 
DECADRS OC 
TAPFLG DC 
ISITERR DC 
NOERR OC 
OPSw oc 
OLOC DC 
KBADR DB 
CRTENRD DB 
RQ2S DB 
SECOND DB 
LPWRT OB 
TTYWRT DB 
TTYRO BB 
CRTRa2S OB 
CARRQ2S D6 
CRT2w0 DB 
CAR2]ND 0B 
TTYENRD DB 
NULL oC 
Ds 
SINK DB 
CON2ND DB 
CONENRD 058 
CONRG2ZS Da 
TITLE OC 
OC 
SORODFORM DC 
DC 
ERRESG oc 
ETESTNG Eau 
ERRNO EQU 
NOERMSG OC 
QHSG ec 
“SGL oC 
De 
MSG3 LC 
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KEYBOARD CEV ADR 


xNOCAOCoOCOOan 


«= 
~ 
i?) 

es 


X*3B" 
X*7et 
x*ao? 
xD 
XtAu?P 
Xt3BF 
X*23° 
X*FB? 
x7FO? 
x64? 
X*FFFF 


nNooocreaa 


"SERIES 16 ALO SUPPORT PROGRAM 06-194F01R01' 


x*o0° 
C*SIGNETICS OR DYNAMICS FORMAT?® 


x*c000' 
C*ERROR 0000*.x*0000' 


an5 
*=<4 STGRE ERRNO AS CHAR CONSTANT 
C*NO ERROR’ sk* 00008 
X*3FaD? 

C*SPECIFY OR VERIFY?* 


xtopt 
C'PLACE OBJECT TAPE IN READER® 


AL112140 
AL112150 
AL112160 
AL112170 
AL112180 
AL112190 
AL112200 
AL112210 
AL112220 
AL112230 
AL112240 
AL112250 
AL112260 
AL112270 
4L112280 
AL1122906 
AL112300 
AL112310 
AL112320 
AL112330 
AL112340 
ALi12350 
AL112360 
AL112370 
AL112380 
AL112390 
AL112400 
AL112410 


AL112420 
AL112430 


AL112440 
AL112450 


AL112460 
AL112470 
AL112480 


AL112490 
AL112500 


AL112510 
AL112526 


( 


SERIES 16 ALO 


004C 
GDSE 
0056 
vDS5E 
0066 
9068 
0070 
co7T4e 
0076 
VO7E 
0D86 
COSE 
9092 
9094 
009C 
oDA4 
ODAC 
0080 
odnB2 
dDBA 
oDc2 
00c6é 
o0ca 
0DD0 
0D08 
ODEO 
ODE2 
oDE4 
ODEC 
ODF2 
ODF4 
ODFC 
0£02 
QE04 
JEOA 
O£OC 
9£14 
0E16 
GE1E 
0E26 
o£ 28 
OE2A 
OEZE 
DESO 
OE34 
dE3C 
OE4O 
ob4e2 


DE44 


1644 
1Ec4& 
1Eca& 
1Eca 


0000 
5441 
4C49 
4&F52 
$00D 
5g41 
§245 
0600 
4953 
5420 
4D20 
4645 
0066 
414C 
4552 
4453 
4049 
0000 
sES5 


. 4620 


4150 
0000 
Sc4c 
5441 
494E 
5220 
0060 
454E 
4552 
ODOA 
454 
5045 
CDOA 
4552 
0000 
4849 
0000 
4445 
494E 
5A45 
0009 
4953 
0000 
2020 
5348 
4520 
0000 
ODOA 
0000 


0606 


5045 
5354 
2042 


5254 
523F 


204F 
5052 
S945 
523F 


4F20 
2045 
20354 
5420 
4D4%2 
Had 
4553 
4143 


2054 
2052 


4426 
§946 


8426 
4349 


5245 
5420 
5052 
4954 
2020 
2020 
4F55 
2020 
OE43 


1E43 


SUPPORT PROGRAM 


eoar 
494uE 
4F54 


204E 
424A 


4FAT 
2042 


4255 
5843 
4B20 


4552 
5444 


4520 
4150 
4541 


4F 46 
5920 


4F HE 
4659 


5220 
5255 


4553 
4941 


4C44 


5220 
4720 
4B3F 
5549 
4543 


5241 
5546 


4646 
4545 
4C49 


204F 
2654 


4444 
4520 
4445 


2056 


2053 


#E20 


5320 
4C49 


2642 


1254 
1255 


1256 
1257 


1258 
1259 


1260 
1261 


06-194F01R01 


MSGS 


MSGS 


MSG8 


MSG9 


@SG61i6 


MSG11 


4S614 


&SG15 


MSG24 
MSG52 


MSG56 


ASGS7 
M5658 


4SG658.1 


LNZB 
ROMBFR 
RMBED 
BUFF 
TOSAVE 


RSAVE 


oC 
DC 


DC 


OC 


oc 
uc 
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x*ob?* 
C*TAPE OR LISTING GR BOTH?* 


x*obD? 
C*PART NUMBER?®* 


x*oD?* 
CtIS OBJECT PROGRAM IN BUFFER?* 


x*oD?* 
CtALO BUFFER EXCEEDS 4k LIMIT? 


x*ob" 
C*NUMBER OF DATA TAPES? 


x*oD* 
C*PLACE DATA TAPE IN READER® 


x*ab* 
CtEND OF VERIFY® 


Xx? oDOA* 
C*END OF SPECIFY® 


x*oDGa’ 

CtERROR®* 

x*oo? 

C*HIT RUNS 

X*op?* 

C*DEPRESS INITIALIZE* 


x'oo* 

c*ris ° 

xr9? 

(om 9 
C*SHOULD BE * 


x*oe 
x'oooat 
ol 
X*'1000?* 
ea] 

128 

2 

8 

32 


AL112536 
AL112540 


41112550 
AL112566 


AL112570 
AL112580 


AL112590 
AL112600 


AL112610 
AL112620 


AL 1212630 
AL112640 


AL112650 
AL112660 


AL112670 
AL112686 


AL112690 
AL112700 
AL112710 
AL112720 
AL112730 
ALi12746 


AL112750 
AL112763 
AL112770 
AL112760 
AL112790 


AL112800 
AL112810 
AL112620 
&L112836 
AL1126840 
AL112850 
AL112860 
AL1126706 
AL112880 


Fe ee ee OO EE eG~UOOO'7X ee Ee ee SET ean CD ae 


SERIES 16 ALG SUPPORT PROGRAM 


CHKSUM/417 PUNCHER 


1EE6& 
LEEA 


1EEC 
1lEFQ 
iEF2 
LEF6 
1EFS& 
AEFC 
LEFE 
1Fo02 


1F06é 
1FOA 
iF OC 
1FOE 
1F10 
iFil2 


1F14 
1F16 
IFAC 
LF LE 
1F20 
1F 24 
1F26 
1F2A 
LF 2E 
LF30 
1F32 
1F 36 


1F3A 
1F3E 
1F4&2 
1F46 
IF4A 
LF4ac 
L1F4eé 
1F50 
1FS2 
1F54 
1F56 
1F5A 
1F5E 


1F62 
1F66 
1F68 
iFec 


2400 
9515 


C810 
2421 
casa 
2440 
0351 
0745 
Cilo 
G240 


caig 
SE21 
9444 
9824 
9411 
9501 


D360 
DE6O 
9060 
2061 
41F0 
9411 
caso 
DA61 
9060 
2081 
C11a 
“IFO 


0349 
c81G 
C830 
0351 
0745 
9A65 
9401 
9829 
9060 
2061 
c1lo90 
RIF AQ 
4300 


caoo 
2303 
cB8a0 
2701 


G100 
OE4&S 
0000 


1EF6 
ith Bt 


0080 


DOTA 
Q078 


1Fé2 


OOCF 
6000 


ifF2a 
1F66 


0091 
0100 
OE43 
0000 


1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1362 
1303 
1304 
1305 
1306 
1367 
1308 
1309 
1310 


1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 


1339 
1340 
1341 
1342 


O6-194F01R01 


* 
SCHKSUP 


* 


$GEN 


SPUNCH 


SPNCH1 


SPNCH2 


STAPL 


STAPLI1I 
STAPLP 


RO.0 
R1,5RkO 


R1eX*1o0# 
Reel 
R3sLNZB 
R4,0 
R5-.01R1) 
R4eR5 
R1s3GEN 
R4<HMN+3 


R1,X*aogaa' 
R2,R1 
RG eR 
R2,.R4 
R1eR1 
ROeRL 


R&aX* 7A? 
RGeX*78* 
RoeRG 

Bel 
R1i5-+STAPL 
R1eR2 
R3X*Ccr 
R620(R1L) 
R6&eRO 

Bel 
R1,SPNCH1 
R1i5.$TAPLI 


R4«MN+3 
Ri«X*100' 
R3«LNZB 
R95<0(R1) 


R1leSPNCHS 
R155STAPL 
ETAPE 


R0+256 
$TAPLP 
RO.<85 
ROel 


PAGE 
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PUNCH 417 TAPE WITH CHECKSUM 


SELECT REG. SET 0 
START 
INCREMENT 


FINAL 
CHECKSUM BYTE 


CHECKSUM BYTE TO ROOT | OADER 


OISPLAY : NORMAL MODE 


CHECKSUM BYTE TO D1 


HALT PROCESSOR. 


SET SOUTDV (PUNCH) ADDRESS. 
START TAPE PUNCH 


PUNCH LEADER 
(R1) = %*0080' 


PUNCH B00T LOADER 


PUNCH ONE=-FOLD GAP. 


GET CHECKSUM BYTE 
START 


PUNCH PROGRAM 


DATA ADDRESS TO OTFSPLAY. 


PUNCH TRAILER, 


DISPLAY CHECKSUM, HALT PROCESSOR. 


TS PUNCH BLANK LEADER 


TO PUNCH 1-FOLD GAP 


AL1T12910 
AL112920 
AL112930 
AL112940 
AL112950 
AL112960 
AL112970 
AL112980 
4L112990 
AL113000 
AL113010 
AL113020 
AL113030 
AL113040 
AL1130590 
AL113060 
AL113070 
AL113080 
AL113090 


AL113110 
AL113120 
AL113130 
AL113140 
AL113150 
AL113160 
AL113170 
AL113160 
AL113190 
AL113200 
AL113210 
AL113229 
AL113230 
AL113240 
AL113250 
AL113260 
AL113270 
AL113280 
AL113290 
4L113300 
AL113316 
AL113320 
AL113330 
AL113340 
AL113350 
AL113360 


AL113380 
AL113390 
AL113400 
AL113410 


coed 


( 


SERIES 16 ALO SUPPORT PROGRAM 06-194F01R01 


CHKSUM/M17 PUNCHER 


iF 6E 
1F70 
1F72 
1F74 
1F76 
1F78 


LF7A 


032F 
2430 
9A63 
9068 
2081 
2206 


1343 
1344 
1345 
1346 
1347 
1348 
1349 
1359 


Ris 
R3.9 
R6eR3S 
RG_—R4 
Sel 
STAPLP 


C | 
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RETURN 


PUNCH BLANK FRAME 


CONTINUE. 


AL113420 
AL113430 
AL113540 
AL115450 
AL113460 
AL113479 
AL11348U 
AL113490 


SERIES 16 ALO SUPPORT PROGRAM 06-194F01R061 PAGE 28 10:46:16 08/02/78 
CHKSUM/M17 PUNCHER 

ASSEMBLED By CAL 035-066R05~-00 (32<51T) 

START OPTIONS$ T=16eSCReCRO 


NO CAL ERRORS 
NO CAL WARNINGS 


2 PASSES 

SCHKSUM 0000 1EES 1293" 

SGEN 0000 1EFS 1300* 1302 

SPNCH2 0000 1F2A 1319* 1322 

SPNCH2 0000 1F4&S 1326* 1335 

$PUNCH O000 1F14 13124 

STAPE 0000 1F06 1305* 1337 

$STAPL 0000 1Fé2 1316 1336 1339* 

STAPLI 0000 1F68 1323 1341+% 

STAPLP 0000 1F6C 1346 1342 1346 

A 6000 OOCA 49G* 501 502 303 504 512 514 515 926 536 531 531 532 
540 S42 558 359 562 563 566 567 570 571i 572 SBYy 5a6 
669 672 677 678 692 

ABSF 9000 SOOF 497% 566 5606 583 663 663 

ABSTOP Q000 1FT7A 

ACI 0000 OG04 692% 718 725 726 T27 727 728 730 

ADC 0000 9002 

ADER 9000 OS5SDE 565% 601 603 

ASC 0000 OBFE 298 303 1095 1114 1129 1133 1137 1141 1180« 

ASMB 0000 O7C4 731 737 

ASTSK ooo0o O98C 141 165 206 233 378 389 922% 

B 0000 0008 493% 532 533 546 547 548 585 587 641 643 649 694 

BFLG o00e OCBE 7106 730 732 737 1213% 

BIAS og00 ocic 157 Sal 595 597 612 614 623 665 1184 

BINDV ocoG 0078 498% 697 706 

BLANK? aoo0 OC1A 1183« 

BOOT 6000 C082 57% 

BOTH 0060 G25C 214 218 220% 

BUFF 0000 1644 514 520 523 526 740 1641 1047 1055 1058 1062 1286 

BYCON 96000 0840 1034 1107« 

BYCON1 0000 OB4A lil2* 1118 

BYTE ocoo oCO4 486% 524 677 679 681 

Cc oocgo OGOC 494% 513 513 314 517 613 614 615 622 623 624 625 626 
627 653 655 658 668 673 

C300 gCO0 O135A 113% 

CALO 9000 O033C 293% 3190 

CALL 9060 0376 311% 

CAR2ND 6000 GCAE 115 1234% 

CARDRYV 0000 I9F2 957 S67 

CARRO G000 OC6A 114 1193*« 1194 

CARR@2S cQo00 OCAC 116 1232+ 

CARWRT g9000 0Cs8 966 1194% 

CBA 0000 CODE 693% 708 706 709 710 711 740 741 742 

CERR ocoo G5C6 519 557+ 

CFLG ecce ocsc 709 718 723 (35 1212 

Cn 9000 OC46EE 653% 659 


( 


SERIES 16 ALO SUPPORT PROGRAM 


CHKSUM/M17 PUNCHER 


CHAIN 
CKIT 
CLIFADR 
CLIFRD 
CLIF WRT 
CMDO 
CMol 
cMpD2 
CMDS 
cMD4 
CON2ND 
CONADR 
CONENRD 
CONRD 
CONRQ2S 
CONT 
CONT 
cONTS 
CONTBYT 
COUNT 
CRB 
CRLF 


CRiLFe2 
CRT 
CRT2 
CRT2N0 
CRIDRV 
CRTENRD 
CRYGET 
CRTRO 
CRTRG!YS 
CRIWRT 
0 


DAT 
0Bc0 
DECADRS 
DEF 

DEV 


DOFIN 
818) 
DUAB 
OURL 
DYNPNLST 
E 

ECHO 
ECHRITN 
EITA 
END 
EROS 
ERR1i 


oo00 
0000 
ooco 
o600 
9000 
0000 
o0co 
0690 
6056 
oo60 
0600 
3000 
0006 
$Go0 
0000 


9000 


0000 
0000 
0000 
9000 
0060 
0600 


0000 
0000 
0000 
0000 
0000 
0000 
0606 
0000 
0c00 
000s 
0000 


0000 
0006 
0000 
0000 
0006 


0co0 
0000 
6600 
9000 
a000 
oo00 
0006 
0000 
00600 
00090 
00090 
e000 


O6£6 
GS3A 
0104 
SCSC 
oceD 
Q23& 
G2Aa2 
OZ2AC 
8256 
02co 
9CB4 
OcTS 
ocas 
OC6E 
OCBé 
O51E£ 
O21E 
0432 


6C78 - 


0009 
0008 
O95E 


oc18 
014¢ 
0158 
ocaD 
OSDE 
OCAS 
o9A4% 
oces 
CCAB 
oC69 
0000 


6003 
o6cc 
oc98 
ocs8s 
0004 


a6co 
0690 
GésC 
06aC 
OAK4 
COOE 
O93E 
0954 
6594 
0608 
0864 
oBBO 


06+194F01R01 


651% 
516 
129 
1195 
1196* 
257 
243% 
247% 


ame 


cud 

246 
1239% 

858 


695 
935 


386% 


733 
138 
1153 


1186 
121% 
1233 
961* 


1191% 
1231i* 
1192 
591 
624 
702 
641% 
289 
661 
697 
986 
637 
631 
620% 
630% 
16017* 
530 


902% 
540% 
580* 
1124% 


958 
1196 


256 
8398 


931 
1241% 


734 
228 
1157 


1192 


595 
634 
713 
645 
349 
1210% 
698 


546 


PAGE 29 
254% 
$30 i20i* 
1197% , 
739 
261 340 341 


596 597 596 
636 651 654 


715 7i7 721i 
758 759 764 
700 702 7ou 
620 626 630 


10$46:16 
356 357 
599 602 
655 665 
725 728 
765 770 
706 713 
6352 653 


ne/s02/78 


428 


604 
671 
733 
1024 


715 


654 


429 


606 

672 

738 
1218* 


74H 


658 


454 


-$12 


739 


THs 


693 


305" 


740 


T48 


915 


£16 


748 


750 


TFT RRNA TCT CAST 1 SR PURSE "TSE: CERES © ae 7 a ~~ gk SR eee EeREDORMERreesS Rep Gee SL; cee SEs EE Ee mimi a 
Nn 
ie 
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CHKSUM/M17 PUNCHER 


ERRCOM 0000 0Ba2 1144% 
ERRMSG oe0Gc 0004 549 573 1148 1246 
ERRNO ogoo oouCc 559 563 567 571 1126 1248 
ERROR oc00 O5F9 566 564 568 S72 
ETESTNO oco0 ObOB 548 1247* 
EXEC 0000 0892 401 461 823% 
EXTR 0000 O72A 529 541 670 677* 
FEED Oooo OBFe 117i*« 1172 
FFCR 0000 OCOE 1161+ 
FLIP 0000 O60E 535 583 
FOuR 0000 0009 491% 509 542 593 577 668 679 
: GETCHR 0000 0932 142 166 207 237 379 390 890% 
GETT a0c00 0704 590 594 633 637 662* 
GOTIT 0000 G17A 126 132 
: GOTIT2 0000 O1A2 142% 150 
GOTITS 9000 0186 146 149% 
GOTIT4 0000 018C 144 151i* 
GOTITS 0006 G1B8E 148 152* 
HEXASC 0060 0818 291 1026 1687*% 
HEXASC1 0000 G22 1092*% 1099 
{ IAMPTOP 9000 0000R 
IN1 0000 G760 699 TO06% 
INCL 0060 0308 339 342% 
( INc2 9000 O03¢4 345 347 
INCADRS 0000 O7FA 294 756% 1036 
INCBOTH 0000 G3A4 321 325% 1061 
{ INPUT gc00 0740 $11 697* 
10 0000 0100 85* 231 940 
TOSAVE 0000 1EC4 232 840 853 943 949 1287 
4 ISITERR 0000 OcgzCc 916 920 1146 1220 
JUMP 0000 0574 532 535« 
KBADR 0000 OCA4 1224% 
i KBREAD 0009 0996 890 930% 
KEEP7 0000 O4F2 450* 
LABEL 0000 O6cCc 538 645% 
{ LADC 0000 O001 
LOANTHER 0000 0A32 1009% 1014 
LOL o000 0632 536 594% 
§ LOL 0000 063A 596" 618 
LOLI 0000 O63E 597 
LOL2 occo d642 S98 
( LDOBJ 9000 O4FS 19] 385 458 
LOWT ooG0 90CcO 79% 81 
LOX 0008 0626 536 590* 
( LEADER a000 009A 63 67 
LEADER 0000 0A28 19601i* 1003 
LERR 9000 0546 543 546% 642 
i LINK g0CO QGOF 50% 108 135 136 142 164 166 190 205 207 227 228 230 
237 261 268 284 319 324 335 340 341 353 355 356 S57 
377 379 384 388 390 400 408 428 429 431 453 454 S60 
{ 559 574 789 813 824 834 843 847 849 872 892 904 207 
9093 915 918 3221 924 944 1011 1101 1120 1149 1152 1154 1156 
1157 


om, 


( 


SERIES 16 ALO SUPPORT PROGRAH 


CHKSUM/M17 PUNCHER 


LINK2 
INKS 
LINK4 
LIsT 
LNTOAOR 
LNTOBPRT 


LNZB 
LOAD 


NTAPES 
NULL 
OLoc 
ONE 
OPSW 
ORIGIN 
ORIGIN2 
ORIGINS 
ORIGIWG 
oTce0 
OTCel 
OTC .2 
OTC.3 


occa 
0000 
00006 
9000 
9006 
9000 


00006 
Q000 
9000 
9600 
0000 
coo0 
0066 
0000 
0a00 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
9000 
a006 
9000 
oco0 
00608 
0060 
0060 
0000 
0000 
0c00 
0000 
0060 
9000 
0000 
0000 
0006 
0000 
oooo 
0000 
0000 
0009 
9000 
ocoo 
00600 
9005 
0000 
ood0 
0000 


0007 
000s 
9002 
0258 
Oc2eE 
6C34 


GE4S 
QUA4 
OBF6 
SCBA 
OS5A 
0106 
OSES 
OcAs 
0312 
0392 
O3CA 
oco4 
OOSE 
ODiC 
opB2 
o0cé 
OoE4 
ODF4 
O£04 
0D30 
OD4E 
0568 
dE0Cc 
O£16 
OE2A 
OE2E 
OE40 
0076 
0094 
OS52E 
0C96 
0p10 
GC9E 
ocg2 
ocBo 
OCA2 
0007 
OCcAd 
aA00 
OA04 
OAD8 
oagc 
G8E6 
O6EE 
GaFS 
090A 


O6-1S4FOIROI 


862 


864% 
870% 


a71 


379 
303 


351 


547 


873 


461 
279 


316 


587 


592 


338 


1025 


596 


695 


1637 


31 610%4s6:16 


581 
331 


1029 


613 


607 


1216+ 


827 
987 


1033 


616 


635 


68/02/78 


1604 
S34 10¢1 


1040 1065 


622 625 
639 641 
1215 

717 723 


1012 


1068 


627 


660 


732 


1674& 


1071 


LAT &x 


741 


1075 
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CHKSUM/M17 PUNCHER 


OTc.4 0000 0924 880% 882 

OuTO ooGd ag9ac 877 681 883% 

cuTl 9990 OA10 273 277 273 964 1001 1012 

ouT12 acod o92C 852 &B4x 

QUTCHR 0000 o8D4% 834 B43 B47 852« 907 309 gau 

OUTCHR2 g9000 0914 855 863 869 87 4* 

PARTNO Go000 OCIE 254 267 283 1165« 

PASFLG oo000 OCc70 122 128 932 1198% 

PASLADR 0060 0102 89*" 121 961 967 

PAUSE 6000 0930 113 856 861 863 872 885% 

PHASE oco0 01D2 162 

PHASEL 0600 G10E 166% 172 

PICK 9000 0005 B87 523 526 528 540 669 662 

PLEADER 6600 OA22 266 337 998% 

PNG ocac cBcéa 199 1155 

PNT 0000 og05 36% 155 155 156 157 158 234 235 236 236 245 249 253 
254 255 256 258 258 259 

PRINT 0000 08A2 137 140 164 205 230 284 324 355 377 388 400 431 453 
466 5506 574 824 S32 918 1063 1149 1152 1156 

PRINT2 0000 O8A6 833% 836 

PRINTS 0000 0886 B36 839% 910 

PRINTSA 0000 08cés 842 846% 

PRINT38 a000 08CA 645 647% 

PRINTS g000 Q8cCE Bubs 

PTOP vo0gd 6ca4 S04 604 606 1208 

PUNO a000 0208 263" 

i PUIY1 0000 0324 261 285% 327 

PUN2 aoago0 O3ac 328* 

PUNS G000 O2FE 275% 275 

PUN4 0000 03cé 333 336% 

PUNCH ec00 0A3S2 268 319 335 1008%* 1076 

PUNLST 0900 9208 262% 

f PURE TOP 0000 GO00R 

QMSG 0000 OD1A 917 1250 

QUESTN ooco 0972 149 171 215 915% 

RO o00¢e 9000 26% 109 1i1 113 lel i22 123 127 128 129 132 i854 154 
208 208 217 219 231 232 288 449 450 500 580 826 832 
648 B55 854 856 858 a59 864 876 aT9 880 891 894 903 


; 905 919 919 920 930 931 934 935 940 944 942 949 $56 
952 954 956 958 9593 961 962 964 965 967 968 1623 1031 
1088 10989 1100 1105 1116 1119 1135 1293 1294 1310 1314 1320 1331 


R1 oo00 GO01 28% 58 66 63 71 76 97 97 iol 104 114 118 130 

131 133 192 194 201 202 203 224 225 226 263 269 260 

282 289 315 320 322 329 332 338 343 344 350 351 436 

438 439 449 448 449 529 541 670 689 683 757 75B 759 

7646 761 763 764 765 766 767 763 770 Tha 825 826 840 

H 841 859 861 864 865 866 866 870 875 876 941 S42 943 
960 963 966 969 939 1902 1024 1033 10357 1061 1072 1692 1115 


1116 1125 1126 1144 1145 1294 1296 1300 1362 1305 1306 1309 1309 
1316 1317 1417 1319 1322 1326 1328 1331 1335 

Rio 0000 GOOA Huy 221 221 226 293 295 326 347 397 397 496 407 423 
433 1031 1032 


( 
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CHKSUN/M17 PUNCHER 


Ril 6600 
R12 e000 
R13 6660 
RL4 oG66 
R15 0000 
R2 0000 
RS ooo0 
R4 0000 
RS 0000 
R6 0000 
R? 0000 
R8 0000 
R9 0000 
RBCD 6000 
RBZER 0000 
ROANSTUF 0000 
RDASF 0000 
RDASFL 6000 
RDASFe 0000 
ROBYTE 9000 
RDCOMP 0000 
RDOBY 0000 
READIT 9000 
REE 0000 
RELP o000 


RETURN occa 
RETURN2 9006 
RETURNZ 0000 
RFIN 0G00 


0008 
oa0c 
0000 
QUDE 


OOOF . 


code 


0003 


0004 


0005 


0006 


0007 


0008 
0009 


0602 
6388 
O82A 
08354 
085C 
OBGE 
G82A 
0456 
C50A 
O7T74 
0C&6 
O5£8 
0496 
84c0 
o4cé 
0664 


222 346 
444 384 
1039 =§1048 
149 165 
1042 1047 
140 147 
1036 1063 
57 72 
19% 135 
254 299 
691 799 
1115 1143 
95 399 
302 303 
492 403 
664 666 
1098 1119 
62 63. 
211 213 
844 B46 
992 993 
1055 1057 
1095 1096 
65 66 
229 267 
387 3993 
917 1009 
1132 1133 
1142 81148 
70 77 
1319 13206 
80 286 
777 778 
1035 1065 
72 77 
418 761 
932 
786 796 
724 729 
1209% 
441 


736 


PAGE 


743 
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389 


1659 
768 


115 


AZH 
fw 


621 
1097 
1532 

296 

313 

425 
1009 
1345 

125 

805 

962 
1047 
1076 
1308 

75 

301 

814% 
1127 
1137 
1329 

607 


305 
1022 


Lov? 
735 


1918 
852 


124 


Sis 4 
Cie ee 


647 
41112 


298 
392 
390 
1089 


145 
815 
9308 
1050 
1092 
1329 
136 
323 
816 
1129 
1139 


1131 


308 
1027 


16079 
696 


1018 
916 


131 


aun 


ery 


648 
1113 


298 
393 
594 


10399 — 


167 


833 
923 
1051 
1093 


139 
334 
B23 
1129 
1140 


1312 


309 
1029 


1346 
898 


eoO7n'n'7 ede 
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CHKSUM/N17 PUNCHER 


RMBED ooco 1643 602 1265% 
ROMBFR oo00 GE4s 192 193 293 407 503 598 539 615 624 815 1631 1284s 
ROMCOUNT G000 OC7C 1204% 
RPARTN 0000 0260 225% 252 352 
Raes 0000 O0CA& 1226« 
RSAVE 9000 16c8& 38 500 560 632 848 905 1088 1100 1108 1119 1289 
RSEGNO 9000 0432 387% 396 
RIN 09000 0002 691% T4aS 752 
SECOND QG00 GCAT 1227 
SEQNUM 9000 0006 488% 505 505 510 520 544 544 735 
SERR 6060 @5De2 522 561 
SETKB oog0 O9AE 106 227 353 S40« 
SETUP 0000 O98BC 282 322 875 949% 1061 
SETUP? G0d0 6A18 265 317 331 99lx i074 
SINK 9000 0CcA3 836 899 934 1233* 
SKIPO 0000 0658 64e 64 646" 
SORDFLG 0000 0cse 152 269 286 332 436 784 1206* 
! SORDFORM 90000 OCE4 139 1244% 
SPCFY 0060 O1FA 168 189% 
SPEC1 9000 OAS2 1d22« 1080 
t SPEC11 6060 966C 806 606 
SPEC2 o0a00 OA8C 1040" 1045 
SPECS 00600 OADC 1038 1053 1664 
t SPEC4 0000 0806 1073 1077 
SPECFLG o000 Ocf82 1207% 
SPECNT 0000 Oc74 1021 1077 1079 1200% 
( SPECOUNT 90600 OC72 403 438 &4G 1919 1849 1051 1060 1199% 
SPECREAD 3900 0868 7383 T97T* 
st 9000 O11€ 103% 
, START 0000 012C 103 108% 
START1I 0000 0108 97* 976 377 378 979 
STORE 0000 O7CE 719 THO 
STPFLG 0000 0C90 1214 
STRTOFLN 0000 OC7TA 1203 
STTTST 000g G1iCce 153% 358 455 11538 
TOE 0000 0546 516* 
TOE2 0000 O54E 521* 
TOES 0000 G64A 600« 
i TOE4 09060 d6F8 656* 
TOES ao00 6488 415% 
TAPE 0000 0252 210 217% 
i TAPFLG 0000 OCGA 202 219 263 315 329 1972 1219*% 
TAPLST e000 6234 207% 216 
TAPOFF 0000 GOF4 334% 1173 
TESTS GOOG G7SA 720 722 725% 
TITLE 0000 SCB& 136 1242 
TREAD 0000 O8FD 1179* 
i TSTENG 0006 G40C 432 HE7* 1154 
TSTENDL 9000 O4F4% 451 455% 
TSTP 0000 O5F3 Lives 
2 TTY G000 016A 112 127% 
TTYORV o000 0904 953 938* 
TTYENRD QC0G OCAF 1235 


i ) 
oad r 


( 
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CHKSUM/M17 PUNCHER 


TTYGET 
TTYRO 
TTYWRT 
TWO 
TYRT 
UNAB 
UNRL © 


UNRX 


VERS 
VER1 
VtR2 
VERS 
VERY 
VERS 
VERG6 
VERFY 
WORD 
WORD 
XITFLG 
XOFF 
XON 
ZERO 
ZERRBF 
ZTAB 
ZTAB2] 


0000 
0006 
0960 
6000 
0000 
0000 
0000 


naan 
VUuUYVe 


0000 
0000 
0000 
0000 
0060 
o0G0 
0000 
9000 
0000 
0600 
0090 
0000 
9000 
ooo8 
0000 
9000 
0000 


CSAZ 
OCAA 
OCA9 
6008 
oBFC 
0666 
G66E 
6676 
O45A 
0478 
649C 
0490 
047C 
0480 
0486 
O4OE 
0714 
6716 
OC7E 
O5FB 
OBFA 
0000 
0882 
OBE2 
06D8 


933% 
1230%* 
1229 

490% 

760 

537 

537 

615 

499% 

4O7* 

421 

412 

408% 

41G* 

H13* 

170 

609 

669* 
1205 

750 

7TO4 

27* 

196 

727 
1162* 


508 
746 
609% 
611~x 
615% 
427 
434 
423% 
418s 
4139 


808 
3764 
612 
674 


1177* 
1176 
T1li 
384 
1163% 


( 


515 552 576 617 626 
1178* 1179 

620 

630 

383 


621 686 647 648 662 


1177 
737 
812 
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PROG= *NONE* 


0006 
0060 
9000 
oGoo 
0000 
0060 
0000 
00690 
6000 
6000 
0000 
ao00o 
6000 
0000 
0000 
0000 
0000 


ASSEMBLED BY CAL 03-066R05-00 {32-BIT) 


0000 
Ooo1 
0062 
0063 
6003 
000% 
000% 
0005 
000s 
0006 
0006 
0007 
0007 
0068 
0008 
0009 
OO0A 


#*061940200 

CROSS 

SCRAT 

ERLST 

TARGT 16 

PROG SERIES 16 ALO SUPPORT PROGRAM 906-194F02R01 
ERK KEKE KKK EK KEKE EKER EE SEER EK EE EGE EKER ES EEE EE KEE ERE EE EERE EEE 
* COPYRIGHT INTERDATA INC. 
* 
*SERIES 16 ALO SUPPORT PROGRAM 06-194F02R01 
* 
THIS PROGRAM TESTS THE ALO SWITCH POSITIONS. DATA PATHS 
AND CUSTONER ROMS 


THE PROGRAM REQUIRES A 6/16.8/16:8/16F WITH AN ALO AND AT LEAST 
8KB OF MEMORY 


THE PROGRAM IS DIVIDED INTO 4 TESTS: 


Testi 
DISABLE SWITCH TEST 


Teste ; 
TEST SWITCH AND DATA PATHS TEST 


TESTS 
ENABLE SWITCH TEST 


TEST4 
CUSTOMER ROM TEST 


TEST 1.2.AND 3 REGUIRE TEST ROMS IN PLACE REFORE START OF PROGRAM 
TEST 4 REQUIRES CUSTOMER ROHS IN PLACE BEFORE START OF PROGRAM 


* HH HEH HHH RAH HK EH HH HH HH 


EREEEECKAEEEKE SERS ERE EE EERE SCEEE RE REL ES ERE SES EESEREKAKEES EER AKERER FEL ES 


RO Eau 0 
R1 Eau i 
R2 EGU 2 
R3 Esu 3 
DAT Eau 3 
R4 ESU & 
DEV EQU 4 
R5 £8uU 5 
PNT EGU 5 
R& EQu 6 
LINK ESU 6 
R? EQU 7 
LINK? EQu 7 
R8 Eau 8 
LINKS EaQu 8 
RS Eau 9 
Rio EGU 16 


AL200000 
AL200010 
AL200020 
AL200030 
AL200040 
AL2e0050 
AL 200060 
AL200070 
AL200080 
AL200090 
AL200100 
AL200116 
AL200120 
AL200130 
AL200140 
AL200150 
AL200160 
AL200170 
AL200180 
AL200190 
AL200200 
AL200210 
AL200220 
AL200230 


AL200280 


AL206256 
AL2062690 
AL200276 
AL200280 
AL 2602986 
AL266300 
&L2003190 
AL2003290 
AL260330 
AL200340 
AL200350 
AL2003560 
AL 260370 
AL200360 
AL200390 
AL200400 
AL200419 
AL 200420 
4.200430 
AL206480 
AL 200450 
AL2004606 
AL2004%70 
&L 260480 
AL200490 
AL200560 
AL2900510 
AL200520 


ood 


ee a ee ee ey ae ee ee ee a ee a Me NE a EE ee. eg 
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GQO0R 
0086 
0082 
o0a6 
008A 
OO08E 
0092 
0096 
OO9A 
009C 
OOSE 
0040 
00A2 
O0A4 
00A8 
OOac 
OOAE 
00BG 
0082 
0084 
0086 
0088 
66aC 
OOBE 
coco 
8oc4 
00c6é 


0003 
0005 
6000 
ocod 
G04¢6 
0000 


2421 
4020 
celia 
C839 
C860 
D343 
CE4aS 
FD45 
2091 
9345 
0855 
2234 
D251 
9351 
0765 
9481 
9A28 
9D45 
2091 
$B45 
C110 
9486 
9828 
C870 
9357 
2283 


0006 
G00C 
e000 
GOGE 
OO0F 
OO0F 


J022 
6505 
OE7S 
voos 
b676 
bO79 


0000 
6000 


OOA4 


80900 


54 
55 
56 


06-194F02R01 

R11 Eau 
R12 EQu 
Ris EQu 
R14 Eau 
R15 EQU 
LINK Eau 


* 


PAGE 


* 
* BOOTLOADER WITH CHKSUM 
* 


LEADER 


LOAD 


LOWT 


ORG 
LIS 


x'aae 
R2el 
R24X*22! 
RieX"500° 
R3eL N25 
R629 
R4eX*7B* 
RGeX*79F# 
R4eR5 
Gel 
R4eR5 
R5eR5 
LEADER 
R5eO0(R1) 
R5.0(R1) 
RE—aRS 
RGeR1 
R2eRB 
R4—R5 
9e1 
R4&.eR5 
RieLOAG 
RBeR6 
R26R8 
R7sK%*8000? 
RS«R7 
LOWT 


16°55:07 08/02/78 


REGISTER SAVE POINTER(16=BIT M/C} 


R3 = ADRi LAST NON=ZERO BYTE } 
R6& = CHKSUM SYTE = X*HNe 
INPUT DEV ADR 


OU,BSY 


IGNORE LEADER 


STORE 1ST NON-ZERO & SUBSEQUENT 8YTE 


RELOAD DATA 8YTE 
GENERATE CHKSUM 


DUeBSY 
LOAD TILL LAST 8YTE 
DISPLAY FINAL CHKSUM 


HALT PROCESSOR 


AL200530 
AL200540 
4.260550 
AL200560 
AL200570 
AL200580 
AL200590 
AL200600 
AL200610 
AL290620 
AL290630 
AL200648 
AL200650 
AL200660 
AL200670 
AL200680 
AL200696 
AL 200700 
AL200710 
AL200720 
AL200730 
AL200740 
AL200750 
AL 200760 
AL200770 
&L 2007380 
AL200790 
AL200800 
AL200810 
AL200820 
AL2008390 
AL200840 
AL200650 
AL200860 
AL200870 
AL2009880 
AL200890 


am 


Pare d 
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00C8 
0100 


O4FE 


0500 
a502 
050% 
0506 


0508 
OS0A 
G50E 
0512 
0516 
O51A8 
OS51E 
0522 
3526 
052A 


052C 
0530 
0532 
0536 
9538 
053c 
0540 
0544 
0548 
6S4C 
OS4E 
0552 
0556 
OSSA 
GS5E 
0562 
6564 
0566 
056A 


9202 
1011 
0202 
6262 


0711 
C830 
40390 
cé20 
4010 
%026 
Cé20 
4010 
$020 
0000 


S1FO 
2701 
4330 
2793 
4230 
4000 
$810 
03290 
0340 
2307 
4810 
D326 
D340 
4800 
4000 
9335 
9E32 
D240 
2305 


iFDé8 
0022 
OOFO 
0036 
0032 
o52c 
0034 
GO36 


GA96 


OS4E 


056C 
O95E 


ocTa | 


0c90 
0C98 


OCT6 
ocsc 
OC9A 
0502 
GC7C 


OCAA 


KKK KES 


ee HN HH OH 


ORG 
ALOBUFST EU 
CRS 
ALOBUFED Eau 
ORG 


KKERKKAEEEKEKEKEEKEEKEKSEKEES EE KEK 


* 


x*100° 
* 
X*UFE® 
* 
x*500° 


* TEST CONSTANTS 


* 
lo ocx 
PASLADR DCX 
CLIFADR OCxX 
LPAOR ocx 
x 


KEEKKEKSEKERKSTSEKKSTSEKSCKKKKESEKLEEKS 


x. 
* START 


x 

START1 XHR 
LHI 
STR 
LHI 
STH 
STH 

ST LHI 
STH 
STa 
By 


* 
START BAL 


C300 STH 


CRT LH 


CRT2 LH 


0202 
1011 
0262 
6262 


R1Ri 
R3eRSAVE 
R3,X*22* 
R2eX*FO?* 
R1,x*3a* 
R2<X*32* 
R2-¢START 
Riext 34? 
R2eX*36? 
C 


LINK,SETKB 
ROel 

CRT 

ROs3 

TTY 
RO,PAUSE 
R1.CARRD 
R2,CAR2ND 
R4,CARRAZS 
CRT2 
R1,CRTRE 
R2,CRT2ND 
R¥.CRIRS2S 
AG ePASLASR 
RGePASFLG 
R3eRO 
K3,R2 

RY ,.CONR@2S 
60TIT 


3 10355307 48/02/78 


THIS AREA IS RESERVER FOR TEST ROM LOAD AREA 


WHEN ALO IS ENABLED AND TEST ROMS ARE IN PLACE, ALO LOAD DATA 
ON CHIPS INTO THIS AREA (SPECIFIED BY 3RD AND 4TH HALFWORD OF CHIPS) 


I/O IDENTIFIERS 

PASLA/PALM READ/WRITE ADDRESSES 
CURRENT LOOP INTERFACE R/Wd ADDRESSES 
LINE PRINTER ADDRESS 


DISABLE INT AT PROCESSOR LEVEL 
SELECT REG SET 15 


Il INT NE’ PS LOc 
TAKE A ILLEGAL INSTRUCTION INT 


ESTABLISH KEYBOARN DEVICE 
CRT ON PASLS 

SRANCH IF YES 

CARGUSEL ON PALSA 7 
BRANCH IF NO 

REASET TRANS PAUSF FLAG 
CAROUSEL COMMANDS 
PASLA/PALM FORMAT COMMAND 


AND FGRMAT COMMANDS 


PASLA/PALM ADDRESSES 
SET PASLA/PALM FORMAT 


AL200910 
AL 200926 
AL200930 
AL200940 
AL200950 
AL200969 
AL260970 
AL200980 
AL 200990 
AL201000 
AL201020 
AL201030 
AL201640 
AL201056 
AL261960 
AL261070 
AL201086 
AL201096 
AL201106 
AL2031110 
AL201120 
AL201130 
AL201149 
4L201150 
AL201166 
AL 202170 
AL201160 
AL201190 
AL201200 
AL201210 
AL2012206 
41201238 
AL201240 
Ai2021250 
44201260 
AL201276 
AL201280 
AL201290 
AL201300 
41201310 
AL201320 
AL2013306 
AL201340 
AL2013506 
AL201366 
AL201376 
&L201386 
AL201390 
AL201466 
AL201420 
AL 201420 
AL202%30 
AL201440 
AL201450 
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056C 2440 L147 «6TTY LIs ROO AL2014%60 

( O056E 4000 OCTC 143 STH RO«PASFLG RESET THIS FLAG AL201470 
oS72 4800 6504 149 LH ROeCLIFAOR AL2014860 

9576 46816 OCTA 159 LH R1+eCLIFRD AL201490 

{ vS7A 942) 151 EXBR R2.R1 AL201500 
O57C 4000 OC7E 152 GOTIT STH RO »CONADR CONSOLE DEVICE ADDRESSES AL201510 

0580 4010 OCS&4 153 STH R1.eCONRD CONSOLE READ/SWRITE COMMANDS AL201520 

{ 0584 D220 OCAB 154 STB R2.CON2ND ANG FORMAT COMMANDS AL201530 
0586 41F6 6986 155 BAL LINK «CRLF AL201540 

Q5sC C850 OCAc 156 LHI RS5.sTITLE AL201556 

{ 0590 41F90 0450 157 BAL R1i5«PRINT PRINT TEST PROGRAM TITLE AL201560 
0594 41F0 0966 i5e BAL LINK «CRLF AL201570 

6000 0598 159 STTYST Eau * AL201560 

{ 0598 o700 160 XHR RO«RO 4.201590 
OS9A 6755 1é1 XHR PNT «PNT AL201600 

$59C 4050 O0C56 162 STh PNTeBIAS AL201610 

{ O5A0 4050 OC98 163 STH PNT «NOERR AL201620 
O5A4 8050 OC92 164 STH PNTeISITERR AL201630 

05a8 4050 6C94 165 STH PNT eERRCOUNT ZERQ GUT ERRCOUNT AL201640 

{ OSac 8650 0C96 166 STH PNT eERL COUNT ZERO OUT ERROR LINECOUNT AL201656 
0580 4I1FO OAGA 167 BAL LINK sZERRBF ZERO OUT ROM DATA BUFFER AL201660 

16S ER EREREE SED EETEAKEE EE RKE SE EKER EECA ESLER ERA ERR KSER ERE KECK EEE EEE EKES AL201670 

( 169 * TEST SELECT PHASE AL201660 
176 —(® AL201690 

0000 0584 171 TEST Feu * AL201700 

{ 0584 §eao0 0500 172 LH RO0,10 &4L201716 
i 0588 &G60 1FD4 173 STH ROsIOSAVE RESTORE USER I/0 CHOICE AL201720 
osac C450 9D0C 174 LHI R5eMS612 TEST 16263 OR 4 AL201730 

4 05c0 41F0 9800 175 BAL LINK.»sPRINT PRINT IT AL 201740 
o5c4 &1E0 O984 176 BAL R14.ASTSK ASTERISK AL2017S0 

o5ca 41F0 0960 i?7 TAGN BAL LINK. GETCHR READ ONE CHARACTER FROM CONSOLE AL201766 

€ o5cc 6240 OCOF i178 STB R4&sETESTNO SET UP FOR POSSIBLE PRINT AL2017706 
05D0 C540 0031 i739 CLHI R4eX*31i°* 1? AL201780 

oSo04 4330 G5F8 160 BE Testi AL201790 

« 0508 CS46 6032 141 CLHI R4Y,xX*352° 2? AL201800 
o50c 4330 6616 182 BE TEST2 AL201810 

05690 C540 0033 163 CLHIT R4eX*33' 3? AL201820 

4 O5E4 4330 96506 184% BE TESTS AL201830 
OSes C546 0034 185 CLHI R4eX*34? 4? AL201840 

OSec 4330 O71A 186 BE TESTS AL2601850 

{ OSFO 41E0 O99A 187 BAL K14%,sQUESTN QUESTION HARK AL2018660 
OSF4 4300 O5C& 188 B TAGN INVALIO INPUT GO AGAIW AL201870 

LED REE KK EEA EKA EE EKER KERR ER ERK EEK REE RK EKA KEE KE RE EEE EEK ERE KE AL201880 

4 190 * AL 201890 
191 »* TEST1 DISABLE SwITCH TEST . AL201906 

192 «* AtL201910 

t 193 # PURPOSE: AL201920 
194 * ENSURES THE OF ERATION OF THE DISABLE SWITCH AL 201930 

i$5 AL201940 

t 196 * DESIGN SPECIFICATIONS AL 201950 
197 «* THIS TEST SETS UP A FLAG IN THE SPECIAL RETURN ROUTINE TO GO To AN AL201960 

198 * ERROR AL201376 

i 159 * IF ALO RESPONDS TO INITIALIZE AL201980 
200 »* THE PRGGRAM ZAPECTS NOQ RESPONSE AS A GOOD FND AL201996 

201i x AL202000 


~<a 


( 
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O5F6 
OSFA 
OSFE 
9602 
0606 


F. eee} 


voua 


Q60E- 


9612 


9616 
061A 
O61£ 
0622 


0626 . 


662A 
062E 
0630 
0632 
O636 
DE3A 
063C 
0640 
0644 
0648 
064C 
0656 
6654 
0658 
865C 
0660 
0664 


Prana 


00096 
0600 
cé5o 
S1FO 
#179 
caso 
41F0 
4170 
2410 
9310 
C500 
§239 
9Bi0 
C500 
92390 
cé&59 
S1FO 
C886 
41F9 
4170 
C850 
41FO 
§170 
C8i0 


Aree 


0616 
0616 
9052 
08D0 
OSAA 
ODLE 
3860 
oBBA 


0000 
0B90 


0A10 
0B90 
oD4e2 
0800 
0052 
G8D0 
OBAA 
ODE 
o8Do 
OBBA 
O3FC 


202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 


250 
251 


256 


* POSSIBLE ERRORS 
* O7- DISABLE SWITCH ERROR 


* 
eK REKEK 
TESTL 


CNTEST 


EGU 
iCS 
STH 
LHI 
BAL 
BAL 
LHI 
BAL 
B 


* 
Riel 
R1leSPECFLG 
R5,4S654 
LINK »PRINT 
LINK2,DPINIT 
K5+4SG660 
LINK PRINT 
TSTEND 


( 


PAGE 
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LOAD NEGATIVE ONE 

SET UP SPECIAL FLAG 

PLACE ALG IN OISABLE MODE 

PRINT IT 

DEPRESS INIT AND HALT PROCESSOR 
DISABLE SWITCH OK 

PRINT IT 


WERE EFEA KEKE KEE EEK ERK EKER EE EEE ER ER EK EAR EEK ESE KEE EAKE EEE EEE EE 


HeRHeH HR HH HHH HEH HG 


* 
eRSKTETE 
TEST2 
TEST12 


PURPOSE ¢ 
ENSURES OPERATION OF TEST SWITCH AND TESTS ALO OATA PATHS 


EGU 
£QU 
LHI 
BAL 
BAL 
LHI 
BAL 
BAL 
LIs 
ROR 
CLHI 
BNE 
RDR 
CLHI 
BNE 
LHI 
BAL 
LHI 
BAL 
BAL 
LHI 
BAL 
BaL 
LHI 


DESIGN SPECIFICATION: 
THIS TEST READS TWICE FROM DEVICE 0 WHILE IN TEST MODE AND EXPECTS 
TO SEE THE FIRST HALFWORDS ON THE ROM 

THEN RESETS THE COUNTER AND READS THE ENTIRE CONTENTS OF THE TEST 
ROMS AND COMPARES IT WITH KNOWN DATA 


POSSIBLE ERRORS 
O5- COMPARE FAIL 
O06- TEST SWITCH ERROR 


* 
* 

R5.,4SE54 
LINK «PRINT 
LINK2.ODPINIT 
RS+4SG5i 
LINK sPRINT 
LINK2eEXEC 
R110 

RieRO 
ROeXtO?r 

ERO6 

R1isRO 
ROeX*AL0* 
ERG6 
R5+4S653 
LINK »PRINT 
R5e4SG54 
LINK sPRINT 
LINK2.DPINIT 
R5eMSG51 
LINK sPRINT 
LINK2 «EXEC 
Ri,sX*3rFc* 


TEST2 TEST SWITCH AND DATA PATH TEST 


PUT ALQ IN DISABLE MODE 


GEPRESS INIT ANDO HALT PROCESSOR 
PLACE ALO IN TSET MODE 

PRINT IT 

HIT EXEC AND HALT 

LOAD DEVICE NUMBER ZERO 

READ 1ST HALFWORD ON ROM 

COMPARE TO EXPECTED DATA ON TEST ROM 
TEST SWITCH BAD ERROR 

READ 2ND HALFWORD FORM ROM 

IS SECOND CHARACTER CORRECT 

TES SWITCH BAD ERROR 

TEST SWITCH GK 

PRINT IT 

PUT ALO IN OISABLE MODE 

PRINT IT 

DEPRESS INIT AND HALT PROCESSOR 
PUT ALS IN TEST MODE 

PRINT IT 

HIT EXEC {RUN} AND HALT PROCESSOR 
SET UP FOR ROM READ 


AL202010 
AL202020 
AL202038 
AL202040 
AL202050 
AL202060 
AL202670 
AL202080 
4L202030 
AL2021060 
AL202110 
AL202120 
AL202130 
AL202140 
AL202150 
4L202160. 
AL202170 
AL202180 
AL262190 
AL202200 
AL202210 
AL202220 
AL202230 
AL202240 
AL202250 
AL202260 
AL202270 
AL202280 
AL202290 
AL 2023006 
AL202310 
AL202320 
AL202330 
AL 202340 
AtL202350 
AL202360 
AL202370 
AL202386 
&L202390 
AL 202406 
AL202410 
AL202420 
AL202430 
AL 2024489 
AL202450 
AL202460 
AL202470 
AL262460 
AL2624890 
AL202500 
AL202510 
AL202520 
AL 202530 
AL202540 
AL202550 


AE NS LT, AES LE STENT iE ARTI FET 


0000 
O733 
C620 
0000 
4932 
2722 
2033 
2451 
4050 
C$50 
&lFO 
4176 
4309 
oud0 
C856 
&1FO 


a630 


O3F8 
0666 
0100 


acac 
QD6E 
0606 
CSAA 
OBAG 
O6D4 
eogsc 
9860 


STH R1sENCONT 
BAL LINK, ROMREAD 


XHR R3.R3 

XHR R2,.R2 
RDAGL LH RieRDATBUF (R2) 
ROAGI2 EQuU * 

LHR R6eRi 


LH Ri2sROMBFR(R2) 
CLHR R12+R6 


BNE ERO5 

AIS R292 

CLHI R2e16 

BLS ROAGI 
CLHI ReaeX*3FC* 
BES ors 


NHI R3XtF? 
Li R1sROATBUF1(K3) 


AIS R3e2 
8 RDOAGi2 
DIS LHI R35.MS654 


BAL LINK sPRINT 
BAL LINK2sEXEC1 
5 TSTEND 


READ &K OF ROM 
INITIALIZE R3 TO ZERO 
INITIALIZE R2 TO ZERO 
LOAD SPECIAL DATA 


LOAD FOR PRINT 

LOAD FOR PRINT 

IS DATA BYTE CORRE T 
COMPARE FAIL EROR 
INCREMENT 

FIRST LINE YET 

NO GO AGAIN 

LISIT YET 


KEEP INCREBENT BETWEEN O ANO F 


SO AGAIN 

PUT ALO IN OISABLFE MODE 

PRINT IT 

HIT EXEC (RUN) ANO HALT PROCESSOR 


KRKERKERAEEE KEE KERR EE EKE EK EE ES EERE ERE KHER REARS EERE EKER EK EK 


TESTS ENABLE SWITCH TEST 


PURPOSE $ 


DESIGN SPECIFICATIONS 
THE CORRECT RETURN 
POSSIBLE ERRORS 


O8- ENABLE SeITCH BAD 
05 COMPARE FAIL 


wee HHR HEH HHH 


*® 
¥REREREA 
TEST3 EQU * 
XHR R3aR3 
LHI R2+X*3F8* 
TST32 EQu * 
STH RSeALOBUFST(R2) 


SIs R2—2 
BNZ2S TST3Z 
LIS R3et 


STH R5eSPECFLG 
LHI R5e4S655 
BAL LINK,PRINT 
BAL LINK2,OPINIT 
8 EROS 

ENTSTGK EGU * 
LHI R5<MSGS7 
BAL LINK,» PRINT 


ENSURE OPERATION OF THE ENASLE SWITCH AND ALO LOAD PROCEDURE 


THIS TEST SETS UP A FLAG In A SPECIAL RETURN ROUTINE AND TAKES 


ZERO CUT RS 
LOAD LIAIT 


ZERO OUT LOC 
DECREMENT 


SET UP SPECIAL FLAS 

PLACE ALO IN ENABLE NODE 

PRINT IT 

GSEPRESS INIT AND HALT PROCESSOR 
ENASLE SWICH BAD 


ENABLE SWITCH OK 
PRINT IT 


AL202560 
AL202570 
AL202580 
AL202590 
AL202600 
AL202610 
AL202620 
AL 202630 
AL202640 
AL202650 
&l202660 
AL202670 
AL2026860 
AL 202690 
AL202700 
AL202710 
AL202720 
AL202730 
AL202740 
AL202750 
AL202760 
AL202770 
AL202780 
AL202790 
AL202800 
AL202810 
AL202820 
AL202630 
AL202840 
AL202850 
AL202860 
AL202870 
AL202880 
AL202890 
AL202900 
AL202910 
AL202920 
AL202930 
AL202340 
AL202950 
AL202960 
AL202970 
AL202980 
AL 202990 
AL203000 
AL203010 
AL203020 
AL203030 
AL203040 
AL203056 
AL203060 
AL203070 
AL202080 
AL203090 
AL203100 


~ 


~~ 


( 


€ 


HEKREKEKE KEKE KEKE RAK KKH REE AREAS EEK EKER EA HERAT ESKER KAEEEEECESERBEESRR 


SERIES 16 ALO SUPPORT PROGRAM 06<€194F02R61 PAGE 
o6poc C850 oD5e 312 LHI R5,4SG54 
GES S1FO0 0800 313 BAL LINKsPRINT 
O6E4 4176 O8BA 314 BAL LINK2.EXEC 
u6GES 0733 315 XHR R3eR3 
OGEA 2428 316 LIS R208 

0000 O6EC 317 TST31 EGU * 
OSEC D362 0C38 3183 LB R6eRDATBUF (Re) 
0000 O6FO 319 TST32 EQu * 
Q6F0 BSC2 0100 320 LB R1i2,ALOBUFST(R2}3 
G6F4 65C5 S321 CLHR R1i2eR6 
U6F6 4230 Garé 322 BNE ERGS 
O6FA 2621 323 AIS R2e1 
OSFC C520 9610 324 CLHI R2,16 
0766 208A 325 8LS TST3i 
0792 C520 O3FE 326 CLHI R2eX*3FeE?* 
0706 2338 227 BES TST33 
0768 C430 OOOF 328 NHI R3215 
O70C D363 0C48 329 L8 R6 eRGATBUFLI(RS) 
0716 2631 330 AIS R3s1 
0712 $300 O6F6 331 B TST32 
0000 0716 332 TST33 EQU * 
0716 8300 0860 333 B TSTEND 
334 +* 
335 
336 * 
337 * TESTS 
338 * 
3239 * PURPOSES 
340 * 
341 =+* DATA TAPES 
342 »* DESIGN SPECIFICATIONS: 
343 * 
24R 0 
345 * JQATA READ FROM THE GATA TAPES 
346 ¥ 
347 * 
348 »* POSSIBLE ERRORS 
349 * O5S-COMPARE FAIL 
350 * 
351 *ERRRKRE 
0000 G71A 352 TESTS EgU * 
O714 2421 353 LIS R241 
971C #020 OCA6 354 STH R2sROMCNT 
9729 C850 OGFE 355 LHI R5.24S682 
O724 41FO0 08D0 356 BAL LINK «PRINT 
0728 41E0 O09B4 357 BAL R14sASTSK 
o72c 41FQ0 0960 358 BAL Link »,GE TCHR 
0730 CB40 0630 359 SHY R4.X*30! 
0734 #040 OC88S 360 STH R4&ANTAPES 
0738 2742 S61 Sis R432 
OTSA C340 FFF9 362 THI R4erl-é& 
O73E 4230 O71A 363 BN2 TESTS 
0742 C850 e652 364 LHI R5.MSG54 
0746 &1FO 9800 365 BAL LINK. PRINT 
O7GA 4170 O38AA 366 BAL LINK2 DPINIT 
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PIT ALO IN OISABLE MODE 

PRINT IT 

HIT EXEC (RUN) AND HALT PROCESSOR 
ZERO OUT RS 

LOAD INIT VALUE 


LOAD FROM FIRST SET 


GET BATA FROM ALO LOAD 
IS IT CORRECT 


FS ~ 
COMPARE FAIL 


INCREMENT 
END OF LINE YET 


LIMIT YET 


MASK OFF LOWER BITS 

LOAD FROM 2NO SET OF DATA 
INCRESENT 

SO AGAIN 


ENSURE THE CUSTOMER ROMS CONTAIN THE SAME DATA AS THE APPROPRIATE 


THIS TEST READS THE CONTENTS OF THE ROMS AND COMPARES IT TO THE 


SET UP FOR 

CHIP PRINT 

MUMBER OF ROMS TO VERIFY 
PRINT IT 


READ INPuT 

STRIP OFF ASCII 
UPDATE ROM NUMBER 
DECREMENT 

TEST FOR 2 % 6 


PUT ALO IN DISABLE MODE 
PRINT IT 
DEPRESS INIT AND HALT PROCESSOR 


AL 203110 
AL2031206 
AL203130 
AL203140 
AL203150 


AL203160. 


AL203170 
AL203160 
AL203190 
AL203200 
AL203220 
AL203230 
AL203240 
AL203250 
AL203260 
AL203270 
AL203280 
AL203290 
AL203300 
AL203310 
AL203320 
AL203330 
AL203380 
AL203350 
AL203365 
AL203370 
AL203360 
AL203390 
AL203400 
AL203%16 
AL203420 
AL203430 
AL203440 
AL 202450 
AL203460 
AL203470 
AL203480 
AL203496 
AL203500 
AL203510 
AL203520 
AL203530 
AL203540 
AL203550 
AL203560 
AL203570 
AL203580 
AL 203590 
AL203600 
AL 203610 
AL203620 
AL203630 
AL203640 
AL203650 


geen 


=m 


GISA 


ocasd 


OCFO 
0806 
DBA0 
G200 
0C82 
0c8é 
0001 


67C2 
OET4 
CALS 
0027 
082C 
a792 
oc&e 
2030 
QE54 


OFF 
O7EA 
OOO0F 


OC6é 
0F58 


RRAG 


GOT1 


GOT2 
GOT3 
GOTS& 


REDAG 


REDAGI 


SPECHAK 


SPECTRUM 


LASMG 


i O69-1L94FO2R01 


PAGE 


R5.4SG5i 
LINK.» PRINT 
LINK2.sEXEC 
RI wNTAPES 
R2eR1 

R29 

R204 

R2 .ENCONT 
* 


LINK.«ROMREAD 
R5<+4SG654 
LINK «PRINT 
R5eSOQRDFORM 
R1IS+PRINT 
R14,ASTSK 
R15+GETCHR 
R4eC*St 
GOTS 
R4¥,.C*Dt 
GOT2 

R159 

GOaTs 
R1L5-¢QUESTN 
GOT1 

R1Sel 
R1i5+SOROFLG 
R10eR1i0 
R11,R11 
R5.MS611 
LINK PRINT 
LINK2.EXECL 
R3.512 
R3,SPECOUNT 
R3e«NTAPES 
R3,1 

R1iGRS 

x 


R12 eROMBFR{(R10) 


LINK eROSYTE 
R9<«X*27? 
RDASF2 

* 

R2,KGACNT 
R2eX*2030° 
R2e"SGA,.3 
R2,R1i0 

R2el 

R4e3 
R2—eX*iFFt 
RS<R2 

* 

R2eR] 
R3kAtF* 
R3<ASC(RS) 
R3sMSGAe4( RS) 
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PLACE ALO IN TEST MODE 
PRINT IT 

HIT EXEC AND HALT 

LOAD CURRENT ROM TAPE CQUNT 
LOAD INTO WORK REGISTER 
ADJUST COuUMT 

TQ DESIRED ASONUT 

SET COUNT 


ROM ENTIRE CONTENTS OF ROM 


SIGN OR OYMAMICS 


PRINT AN ASTERISK 
READ A CHARACTER 
IS IT SIGNETICS 


IS IT SPECTRUM DYNAMICS 


ZERO OUT R11 
PLACE OATA TAPE IN READER 
PRINT IT 


LOAD PRESENT VALUF OF NTAPES 
TS IT 00D OR EVEN 
ADD ADJUST VALUE 


LOAD BYTE 


IS IT A DELIMETER CHARACTER 
NO WHAT IS IT 


LOAD CHIP NUMBER 

CONVERT TOG ASCII PLUS A SPACE 
STORE AWAY IN MESSAGE 

LOAD HALFWORD COUNT 

ADJUST FOR BYTE ADDRESS 


LOAD INTO WORK 
LOAD INTC WORK 


MASK OFF BOTTOR 
CONVERT TO ASCII 


AL203660 
AL203670 
AL203680 
AL203690 
AL203700 
AL2037106 
AL203720 
AL203730 
AL203740 
AL203750 
AL203760 
AL203770 
AL203780 
AL203790 
AL203800 
AL203810 
AL203820 
AL203630 
AL203840 
AL203850 
AL203860 
AL203870 
AL203880 
AL203890 
AL203900 
AL203910 
AL203920 
AL203930 
AL203940 
AL203950 
AL203960 
AL203970 
AL203980 
AL203990 
AL 204000 
AL204010 
AL264020 
AL204030 
AL206040 
AL 204050 
AL204060 
AL204070 
AL204080 
AL204090 
AL204100 
AL204210 
AL204120 
AL204130 
AL204140 
AL204150 
AL204160 
AL204170 
AL204180 
AL 204390 
AL204200 


se 
y 


( 


SERIES 16 ALO SUPPORT PROGRAN 


O7FB 
O7FA 
OTFC 
O7FE 
0800 
0802 
0806 
080A 
080C 
0810 
9814 


0816 
O81A 
981C 
0820 
0822 


0826 
0828 
08eC 
0836 


0834 
0838 
0834 
083C 


083E 
0840 
0842 
0846 
084A 
084C 
0850 
0854 
0856 
085C 


0860 
0864 
0866 
O86A 
086C 
0870 
O874 
0878 


9024 
2741 
2269 
2404 
0615 
C826 
HFG 
65C6 
4230 
4810 
2139 
6000 
4810 
2711 
#019 
2133 
4300 
0600 
26Aa 
4300 
C590 
4230 
0000 
4830 
3031 
2382 
2684 
co0o0 
944B 
2421 
6120 
4839 
2731 
4030 
4230 
§830 
4230 
4300 


0006 
C&io 
9501 
4890 
2137 
cé56 
41F0 
S1FO 
&300 


422 
uaa 
G24 
425 
426 
42oT 
428 
429 
430 
431 
432 
433 
GSR 
435 


G6-194F02R01 


THESR1 EQU 


T4HE5R EQU 


RDASF2 CLHI 


RAG31 Eau 


RAG3 EQU 


SREEEEKKE 
* 


* TEST MODULE 


x 
TSTEND Eau 
LHI 


EPSR 


KEEP? LH 


8NZS 


LHI 

BAL 

BAL 
TSTENDI 8B 
HERECRAEKE 


R204 

R4_l 

LASHS 

RO 

R1-R5 
R2~.4ASGA.5 
R15.DECASC 
R12] «RE 
EROS 
R1,SOROFLG 
T4HE5R 

* 
R1.SPECGUNT 
Riel 
R1.SPECOUNT 
T4SESR 
RAGS 

* 

Ride2 
REDAGL 
RIeX*1Tse 
REDAGL 


*¥ 
R3eNTAPES 
R3ei 

RAGS 
R1lis4% 


* 

R1IOsR1L1L 
R2el 
R2.ROMCNT 
R3.NTAPES 
R34 
R3.NTAPES 
REDAG 
R3Z¢ERRCOUNT 
LGOGERPRT 
TSTENG 


ENG ROUTINE 


=x 

R1eX*Fot 
ROeR1 
ROeNOERR 
TSTENDi 
R5,;NOERMSG 
LINK sPRINT 
LINK CRLF 
STTTST 


( oe 
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DECREMENT 
GO AGAIN 
SDECIMAL DIGITS 


LOAD START OF MESSAGE TO CONTAIN DEC 
CONVERT TO CECIMAL 

IS BYTE GOOD 

CGMPARE FAIL EROR 


INCREMENT 


IS IT TAPE OFF 


LOAD CURRENT NUMBER 
ADJUST 

IF 00D SKIP 
INCREMENT 


SET UP R2eFOR PRINT 

UPDATE RGMCOUNT 

LOAD PRESENT VALUE OF NTAPES 
DECREMENT 


60 AGAIN 


ANY ERRORS 
YES PRINT 


DISABLE INT @ PROCESSOR LEVEL 
LOGK &@ ERRGR FLAG 

EVEN AFTER ERROR START TEST AGAIN 
PRINT "NO ERRORS 


START TEST AGAIN 


* THIS SUBROUTINE REAOS THE CONTENTS OF THE ROM 


* INTO THE BUFFER RMBFRO 


* 


AL204210 
AL204220 
AL204230 
AL204240 
AL 204250 
4L204260 
AL264270 
&L 204280 
AL204290 
AL2C4300 
AL 2043106 
AL204320 
AL204336 
AL2Z04340 
AL208350 
AL204260 
AL208#370 
AL294386 
AL204390 
AL208400 
AL204410 
AL2044920 
AL204430 
AL206640 
AL209450 
AL204460 
ALZ2OH470 
4L2044580 
AL208499 
AL2046500 
&L204510 
AL2oa520 
AL204530 
AL2645406 
AL204559 
AL208560 
4.204570 
AL264560 
AL204590 
AL204600 
AL204610 
AL 208620 
AL204630 
AL 204680 
AL204650 
AL204660 
AL204%670 
AL204680 
AL 204690 
AL204706 
AL204716 
AL264720 
AL204736 
AL208740 
AL208756 


™ 
Ht 


SERIES 

0009 
G87C OQ766 
O8TE 4870 
0882 2459 
0884 0956 
0888 2662 
086A 0567 
086c 2034 
OBGE O30F 
9890 48F) 

0600 
0894 4210 
0898 4330 
o89C 4308 
B8a0 Ca50 
O8A4 41F 0 
08a8 2305 
OBAA c850 
DBAE 4#1F0 

2000 
page c8i0 
0886 $502 
03888 0307 
O8BA cé50 
O8BE 41F0 
O8C2 D350 

0000 
G8cé 9056 
08C8& C366 
oecc 2233 
O8CE O307 
06p0 boa0 
0854 D34sS 
0&DE& 41FO 
dSCC 2740 
O8BE 2533 
G8E£0 2651 
08E2 2207 
O8E4 2444 
06E6 D316 
OBEA 27i3 
Q8EC 2335 
O8EE 41F9 
oaFe 2541 


acac 
0894 
0B98 
0508 
060% 


ODEO 
05U0 


0088 
08De 
06B2 
6600 


0036 
oapa 
OCTE 
Q8C6& 


0026 


iF O8 
vooa 
0902 


1FO5 


9902 


Gori F4FO2KGi 


ROMREAD EOQU 


RCMREAD2 RH 


EXEEREKKERE 


PAGE 


* 

R6rRG 
R7»eENCONT 
R5.0 
R5«ROMBFR( RG) 
R612 

R6.R7 
ROMREAD2 
LINK 
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ZERO OUT R6 
LOaDd DESIRED COUNT 
LOAD DEVICE NUMBER OF ZERO 


INCREMENT 
LIMIT YET 
NO GO AGAIN 
RETURN 


* THIS SUBROUTINE INSPECTS THE RETURN FLAGS AND BRANCHES ACCORDINGLY 


*x 


SPECRET Li 

TIE? Eau 
8M 
B2 
B 

FRKKKEHRE 


R15.SPECFLG 
* 

ERQ7T 

STARTI 
ENTSTOK 


* THIS SUBROUTINE PUTS TOGE 


* SEQUENCES 

x 

EXECL LHI 
BAL 
BS 

OPINIT LHI 
BAL 

EXECS Feu 
LHI 
EPSR 
BR 

EXEC LHI 
BAL 


PRESARKI ESuU 


EKEKKKEKEE 


R5e4SG60 
LINK sPRINT 
EXEC2 
R5.4SGS6 
LINK «PRINT 
« 
RieX*saoo? 
ROR 
LINK2 
R5:4SG52 
LINK «PRINT 
R5+sCONADR 
* 

RS5eR6 
RGeX* 20° 
PRESBRK1 
LINK? 


* THIS SUBROUTINE IS USED 
* TO PRINT THE ASCII MESSAGE 


* 
PRINT STM 
PRINT2 La 
BAL 
Sis 
B2ZS 
AIS 
BS 
PRINTS Lis 
LB 
Sts 
828 
BAL 
ics 


ROeRSAVE 
R4eOBt(R5) 
LINK.» OUTCHR 
R4,i3 
PRINTS 

R5el 

PRIRT? 
R41 
RLi,vsLlOSAVE+i1 
Ries 
PRINT3A 
LINK se GUTCHR 
R4_ei 


DISABLE SwITCH BAD 


ENABLE SwITCH OK 


THER SOME COMMONLY USED PRINT 


HIT RUN 
PRINT IT 


DEPRESS INITIALIZE 
PRINT IT 


HALT PROCESSOR 
ACTIVATE 
RETURN 


HIT EXEC RUN 
PRINT I 


SENSE STATUS 
TEST BREAK 


RETURN 


STORE REGISTERS 
GET A MESSAGE SYTE 


iLOP FOR NEXT CHAR 


BRANCH IF YES 


AL 204760 
AL204770 
AL204780 
AL204790 
AL204800 
AL204610 
AL204820 
AL204830 
AL 204640 
AL 204850 
AL 204860 
AL204870 
AL 204880 
AL204890 
AL208900 
AL 204910 
AL204920 
AL204930 
AL 2049406 
AL204950 
AL204960 
AL204970 
AL2048980 
AL204990 
AL205000 
AL205010 
AL205020 
AL205030 
AL205040 
AL2056050 
AL205066 
AL205070 
AL205680 
AL205090 
AL205100 
AL205110 
AL205129 
AL205136 
AL205140 
AL205156 
AL 205160 
AL205170 
AL 205180 


AL 205190. 


AL205200 
AL205210 
Ai205220 
AL205230 
AL205240 
AL205250 
AL205260 
AL205270 
AL205280 
AL205290 
AL 205300 


roan 


~ 


nn 


—— 


( 


SERIES 16 ALO SUPPORT PROGRAM 96-194F02R01 


08F4 
O8Fé 
08F8 
O8FC 
8500 


0902 
0966 


Mana 
ware 


o90C 
6910 


0914 
0918 
O91A 
991C 
9920 
0922 
0926 
0928 
a92C 
0930 
0932 
0936 
0938 
O934 
O93E 
C942 


0946 
OSGA 
OS54C 
O94E 
0350 
0952 
9956 
6958 


095A 
O95E 


0966 
0964 
0966 
0968 
O96A 
096C 
c970 
0974 
0976 


2302 
2441 
4#1F0 
0100 
S30F 


0902 
1F08 


o95C 
1FD5 


0946 
O95E 
0914 
OC7TE 
O95E 
0946 


OOTF 
0012 


095E 
0914 
OS5E 
0914 


0946 
OSBE 


OCA7 


O95A 
O95A 


QATA 


ocs4 
COAS 


OC7F 


532 
533 
S34 
535 
536 
SS7 
536 
539 
540 
541 
S4Z 
543 
544 
545 
546 
547 
548 
S&9 
550 
551 
552 
553 
954 
555 
356 
557 
555 
559 
560 
Sal 
562 
563 
564 
565 
566 
567 
368 
569 
579 
571 
Ste 
573 
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YES OUTPUT X*"01? 
TERMINAL CHARACTER 


* THIS SUBROUTINE OUTPUTS A CHARACTER TO A LIST DEVICE 


BS PRINT3B 
PRINT3A LIS RU,gi 
PRINT3B BAL LINK ,OUTCHR 
PRINTS LS ROsRSAVE 
BR LINK 
iw ew ew ewww ne wee ewe ne - 
x 
OUTCHR STH R15:0UT12+2 
L8 ROsIOSAVE4+1 
sis ROe% 
BNZ OUTCHR2 
STH ROePAUSE 
oTc.9 Eau * 
LB RQ,CONADR 
SSR ROeR1 
BFFS &0TC.2 
OTC.1 LH R1+PAUSE 
B@NZS oOTc,o 
B OUTCHRe 
OTC .2 RDR ROeR1 
NHI RigX*?7Ft 
SHI R1l,xX*12* 
BNZS OTC,.3 
STH R1sPAUSE 
BS OUTCHR] 
OTC .3 SIS Rie2 
BAZ OTC .6 
STH LINK.sPAUSE 
B GTC.0 
GUTCHR2 E8uU * 
BAL Ri sSETUP 
SSR RO«RI 
ETFS 3:0uUTO 
BIFS 8e2 
WOR RORY 
OTC.4 $$ RO:SINK 
BTFS 3:0UTO 
BIBS 8+0TC.4% 
outa EU * 
ouT12 3 * 
PAUSE OCxX a 
Recaaneawse= woaewennwoweese wane 


* THIS SUBROUTINE IS USED 


* TO GET A CHAR FROM KEYBOARD (IN 


* 
GETCHR 


ECHO 


BAL 
SSR 
BTCR 
BTB6S 
ROR 
LB 
CLHI 
BNES 
LB 


R¥-eKBREAD 
ROeR4y 
L+eLINK 

8s2 

RORY 
R3,CONRD 
RAeXtAB? 
ECHRTN 

RS. CONADR+1 


SAVE RETURN ADDRESS 


BRANCH IF NO 
RESET FLAG 


LOAD OEVICE NUMBER 

CHAR TO READ? 

BRANCH IF YES 

PAUSED? 

BRANCH YES WAIT FOR OC2 


OCI,DC4(FOXK ONLY? 
oc 2 

RESET FLAG 

OC &? 

NO 

RESET FLAG 

ANG WAIT FOR DBC 2 
SET UP FOR PUTPUT 
WAIT FOR NOT 3uSY 
BRANCH IF OFFLINE 


OUT PUT DATA &STYE 


REG R4) 

PUT KB GEV InTO READ MODE 
IF DU RETURN 

IF BUSY LOOP 

REAC CHARACTER IN RY 


CAROUSEL? 
NO 60 NOT ECHO 


AL205310 
AL205320 
AL205330 
AL205340 
AL205350 
AL205360 
AL205370 
AL205386 
41205390 
AL295400 
AL205410 
AL205420 
AL 205430 
AL205446 
AL205450 
AL 2054660 
AL205470 
AL265%80 
AL205490 
AL205500 
AL205510 
AL205520 
AL205530 
AL 265540 
AL205550 
AL2065560 
AL205570 
AL205580 
AL205590 
AL2z05600 
AL2056190 
&L205620 
AL205630 
AL20564%0 
AL205650 
AL 205660 
AL205670 
AL2G5680 
AL205690 
AL205700 
4L205710 
AL265720 
AL205730 
AL20574%0 
AL205750 
AL205760 
&L205770 
AL205780 
AL205790 
AL 205800 
AL205610 
AL205820 
AL205830 
AL2058480 
AL205850 


ad 


GA00 


06-2194F02R01 


ss 


BTES 


#BR 
ECHRTN NHI 
CRLF STM 
LIS 


R9.SINK 

8e2 

RIRY 
R4eX*7F?* 
ROsRSAVE 
R¥,13 

LINK eOUTCHR 
R4.13 

LINK. OUTCHR 
PRINTS 


PAGE 


Romer eee en ewe tee wen we mer enn en 


* THIS SUBROUTINE IS USED 


* TO OUTPUT 

* 

GUESTN BAL 
STH 
LHI 
BAL 
XHR 
STH 
BAL 

ASTSK EQu 
LHI 


"2? TO CONSOLE 


LINK CRLF 
R1i5sISITERR 
R5,08S6 
LINK sPRINT 
ROeRO 
RueISITERR 
LINK se CRLF 

* 

R4eX*ZAt 
LINK »,OUTCHR 
R14 


* THIS SUBROUTINE Is USED AS A 
* LIST DEVICE SET UP ROUTINE 


* 

SETUP L& 
SIS 
BZ 
SIs 
BZS 
SIS 
BZ 
SIs 
B2 

TTYORV LB 


CRTORV LB 
LPORY b 


CARORV LB 


BR 


RO+«IOSAVE+1 
RO«i 

CRTBRV 

RO 

TTYORV 

ROel 

LPORV 

ROel 

CARDRV 
ROeCLIFADR+1 
RO-sCLIFWRT 
Rl 
ROsePASLADRe1 
KO.sCRITWRT 

Ri 

RG eLPADR 
ROeLPHRT 

Ri 
ROePASLADRE1L 
RO«CARWRT 

Ri 


12 10:°55:07 oO8/02,/78 


ECHO RECEIVED BYTE 
MASK OFF PARITY BIT 
STORE REGISTERS 
OUTPUT CR 


CARRAIGE RETURN 
GuTPUT IT 


PRINT 2° 


SPACE 
ASTERISK 


GUTPUT A CHARACTER 
RETURN 


GET LIST DEVICE IDENTIFIER 
YES GO TO CRT ORIVER 

YES GO TO TTY ORIVER 

YES GO TO LP ORIVER 


YES GO TO CAROUSEL ORIVER 


4 OK OR I IE Oa 
* THIS PHASE MUST RESIDE AT X*A00t~X*A148 
* TEST ROM RETURN ADDRESS AT X'A10* 


* 
ORG 


X*aoo? 


AL205860 
AL205870 
AL205880 
AL205890 
AL205900 
AL205910 
AL205920 
AL205930 
AL205940 
AL 205950 
AL205966 
AL205976 
AL205960 
AL 205990 
AL206000 
AL206016 
AL206020 
AL206030 
AL206040 
AL206050 
AL206060 
AL206070 
AL206080 
AL206090 
AL206100 
AL2G6110 
AL206120 
AL206130 
AL206140 
AL2061506 
AL206160 
AL206170 
AL 206180 
AL206190 
AL 206200 
AL 206210 
AL206220 
AL206230 
AL 206240 
AL206250 
AL206260 
AL206270 
AL206280 
AL206290 
AL206300 
AL206310 
AL206320 
AL 266330 
AL206340 
AL206350 
AL266360 
AL206370 
AL206380 
Ai.206390 
AL 206400 


m™ 


=e 


( 
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SAG 
gA04% 
OA08 
DABC 
GA10 


CA14 
CA16 


ONATA 
WAL 


QALE 
GA20 
GA22 
0A24 
GA28 
QA2C 
0A30 
OA32 


0A36 
DASA 
OASZC 
OAKG 
OA42 
CAGH 
DAYS 
GAGA 
GAKC 


0450 
BA52 
GA54 
DAS6 
DASE 
GASA 
OASC 
0AG6O 
dAGe2 
DAG4 
OAGE 


QAGA 
OABC 
CATO 
OATH 
GATG 
GATE 


#300 
4306 
4390 
#300 
4390 


oG00 
O766 
D373 


Ac rn 
wy 


9078 
26F1 
S879 
c530 
4330 
4619 
2133 
4390 
0006 
C599 
G28F 
C530 
2182 
2737 
C450 
9164 
0669 
4300 
00900 
2443 
ST22 
9078 
20F2 
9873 
913F 
£D20 
27e1 
20357 
0862 
4330 


OCOG 
2445 
Cé5a 
4045 
2752 
2213 
O3S9F 


0308 
0508 
0506 
0506 
6890 


GAL4 


QALE 


3A50 


0001 


6702 


GAGA 


OFFE 
QET74 


| ( 


06~-194FG62R01 PAGE 10:55:07 G8/02/78 
ORIGINI 3&8 START1 

ORIGIN2 8 STARTI 

ORIGINS 8B START1 

ORIGING 8 START 

ROMRTN B SPECRET 

* THIS SUBROUTINE READS ONE BYTE FROM DATA TAPE AND 
* PUT IT IN Ré 


ROBYTE Eau * 
RBANSTUF XHR R62R6 


LS R7eX*76! 

oc Zee eos 
RDASF SSR R7sR8 

BT8S 151 


ROR R7eRG 
CLHI RGeX'26? 
BE READSPEC 
LH R1+SOROFLG 
BNZS RDASF21 
8 RDASF 
RDASF21 Eau * 
CLHI RIexX*30* 
BLR LINK 
CLHI RIeX*3A? 
BLS ROASF1 


SIs R947 
RDASFi NHI RI »X're 

SLLS K6c4% 

OWR Rb6eRD 

B ROASF 
READSPEC EGU * 

LIs R4.8 


XHR R2¢R2] 
ROSPEC1 SSR R72R8 
ET38S 15.1 
ROR R7eRS 
SLLS 3.15 
Sit R2e1 
Sis Reel 
BNZS ROSPECL 
LHR RoeR] 
58 SPLCTRUM 
KEKKRKECEKEE 
* 


ZERO OUT RE 
LOAD AGORESS OF TAPE READER 


1AM COMMAND OTe AE OFA 
be FR bE Row 


SENSE STATUS ON READER 


YES SPECIAL READ ROUTINE 


TIS IT VALID ASCII 
RETURN ' 
Is IT GREATER THAN 9 


ADYUST CHARACTER 

MASK OFF LOWER ORDER CIGIT 

SHIFT OVER FOR COMBINATION wITH NEXT 
OR IN NEXT CHARACTEWR 


LOAD & BYTE COUNT 

SENSE STATUS ON TAPE READER 

READ A BYTE 

PLACE SIGHIFICANT GIT IN OBL RRG 
SHIFT BIT 0 GF REG 3 INTO REG 2 
DECREMENT COUNT 


SET IT UP 


* THIS SUBROUTINE PUTS ZERO INTO 20" SUFFER 


* 
ZERRSF EQU x 


LIS R4-0 

LHI R5.X*FFE® 
RSBZER STH R4 sROMSFRIRS) 

SIS R52 

BNAS KSZER 

sist LINK 


CREEK REE EEE EEK 
* THIS SUBROUTINE IS USED 
* TO PUT KEYBOARD DEVICE IN READ 


INIT RA 
LOAD LIMIT 
STORE ZERO INTO AUFFER 


IF NOT DONE STORE AGAIN 
RETURN 


MODE 


AL206410 
AL 206420 
AL206430 
AL 206440 
AL206450 
AL206460 
AL206479 
AL206480 
AL206490 
AL206500 


Al 2ncRin 
a 


epevuwev 


AL206520 
AL206530 
ALZ665496 
AL206556 
AL206566 
AL206576 
AL206580 
AL206590 
AL206600 
AL206610 
AL266620 
AL266630 
AL206640 
AL206650 
&L206660 
AL206676 
AL206680 
AL206696 
AL266700 
AL206710 
AL206729 
AL20673¢ 
AL206740 
AL206750 
AL206760 
AL206770 
AL266786 
AL 206799 
AL206860 
AL 206810 
AL 206820 
AL206836 
AL206849 
&L206850 
AL206869 
aL206870 
AL206880 
AL206890 
AL206900 
AL206910 
AL206926 
AL206930 
AL206940 
4.206956 


‘eee 


Fe ee ee eee ee eT 


om, 


a 


SERIES 16 ALO SUPPORT PROGRAM 


OATA 
QATE 
0Aa2 
GAGS 
QABA 
GAaC 
0A30 
OASYS 


OA9I6 
QAGA 
OASC 
GASE 
OAK] 


DAAw 
OAAS 
DAAC 
OABO 
oAB4 
OABS 
OABA 
oAaC 
oaAca 
gace 
dAc4 
QACS 
OACC 
OACE 
0AdZ 
OAD4 
OADE 
QADA 
GANnC 
DADE 
QAED 
DAE 
OAES 
OAEA 
GAEC 
OQAFO 
GAF2 
OAFS 


CAFS 
OAFA 


D300 
DEGO 
4896 
4206 
0334 
DBCO 
DEGO 
03904 


0300 
9419 
6610 
4Q19 
O30F 


D000 
C830 
4039 
4030 
4030 
C744 
0755 
4514 
21867 
2631 
0235 
4B14 
2298 
C839 
2642 
2651 
c550 
208F 
0850 
2i1A 
D345 
D242 
262) 
2651 
C950 
2088 
Dido 
O3GF 


cOG0 
O85C 
9054 


OC7E 
oc as 
6C7C 
GA8E 


OCA? 
OCAA 


0500 


1FG4 


697 
698 
699 
700 
701 
702 
703 
704 
7905 
706 
707 
708 
709 
719 


JG6-1LFISFO2RO1 PAGE 
* 
KBREAD LB RO,CONAOR 

oc RO.CONRD 

LH R9ePASFLG 

NOP ¥ 


TTYGET B2R RY 

CRTGET RD ROeSINK 
oc RGOseCONRG2S 
BR R4& 

KKEKREKEK KEKE 


16°55:07 08/02/78 


PASLA? 


RETURK 
OUMMY READ 


RETURN 


* THIS SUBROUTINE IS USEO TO OIRECT I70 TO CONSOLE 


* 

SETKS LB RO.IO 
EX6R RleRO 
OHR R1iskO 
STH R1eIOSAVE 
BR LINK 

ER EKEKEK 


KB=LIST 
RETURN 


* THIS SUBROUTINE CONVERTS A HEXIDECIMAL NUMBER TO DECIMAL 


* 

DECASC STs ROsRSAVE 
LHI R3.C*00° 
STH R3,DECI 
STH R3eDECI+2 
STH R3eDECI+4 
XHR R4.RG 
XHR R5eR5 


DEC1 CLH R1Ie«VECITAB(R4) 
BLS DEC2 
AIS R3ei 


STB R3»sBECTE(RS) 
- SH RI sDECITAB(R4) 


BS DEC1 
DEC2 Lil R3.C*O?* 

4ts R4e2 

AIS R5el 

CLHI R5e5 

BLS DECI 

SHR R5eR0 

BAS ' DECS 
DECS LB R¥.DECI(R5) 

STs RS$eG(R2) 

AIS R2ei 

AIS RSel 

CLHI R5,45 

BLS DEC3 
CEC4 im RO »RSAVE 

BR Rid 
HEKEKEKRE 


* ERROR ROUTINES 
* 
* CORPARE FAIL 


EROS Eau * 
LOR RS5+Ri2 
SRLS R5a4 


STORE REGISTERS 
LOAD ASCII ZERO 
STORE INTO CONVERT Taga 
STORE INTO CONVERT TAB 
STORE INTO CONVERT TAB 


ZERG OUT R5 

COMPARE 

IFLESS SKIP 

INCREMENT 

STORE IN CONVERT TAB 
SUBTRACT DECIMAL COUNT 
GO AGAIN 


INCREMENT 
INCREMENT 

LIMIT 

LESS THAN GO AGAIN 


LOAD UP 

STORE AWAY 
INCREMENT 
INCREMENT 
FINISHED 

NO GO ANOTHER 
RESTORE REGISTERS 
RETURN 


BOA INTO WORK 
SHIFT OVER 


AL 206960 
AL206970 
AL206980 
AL206990 
AL207000 
AL207010 
AL207020 
AL207030 
AL207040 
AL207050 
AL207060 
AL207070 
AL207080 
AL207090 
AL207100 
AL207110 
AL207120 
AL 207130 
AL207140 
AL207150 
AL207160 
AL207170 
AL207180 
AL207190 
AL207200 
AL207210 
AL207220 
AL207230 
AL207240 
AL207250 
AL207260 
AL207270 
AL207280 
AL207290 
AL207300 
AL207510 
AL207320 
AL 207330 
AL207340 
AL207350 
AL207360 
AL2073706 
AL207380 
AL207390 
AL2074006 
AL267410 
AL207426 
AL207430 
AL207449 
AL207450 
AL207469 
AL207470 
AL207480 
AL207490 
AL207500 


om 


ee 


rol 


( 
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QAFC 
OBOG 
9804 
OB06 
OBOA 
OBOE 
6B12 
OB14 
0616 
0814 
GBiE 
0B26 
GB24 
C825 
oB2c 
0B30 
GB34 
0B38 
OB3C 
0840 
OB44 
0648 
oB4c 
0850 
83854 
9858 
o65c 
9860 
C664 
0868 
oBeCc 
oB70 
GB74 
0878 
oB7C 
0680 
0B84 
0688 


-088C 


6890 
0394 


0B96 
OB9C 


OBAO 
0BA4 
0648 
OBAA 
OBAE 
oBB80 


D355 0cé66é 
D259 GDB2 
085C 

C459 QO0F 
6355 0C6é 
C250 oDBS 
0856 

9054 

D355 ucas 
D250 eDc4 
NaSs 

C450 GOOF 
D355 OC66 
0256 @Ocs 
C610 3035 
0350 OCOF 
C550 0034 
%230 OBA4 
4820 OC94 
c5209 0156 
4389 OBDA 
C832 1E74 
4810 9082 
#013 0006 
4810 90C4 
4813 0002 
4810 E54 
460135 C604 
#810 O&5é 
#013 0006 
4810 GESA 
4013 0005 
48160 GESE 
8613 0004 
810 GE69O 
4013 900C 
CA20 o01¢ 
4020 OC94 
43500 0616 


oesco 0390 
C8ib 3036 
#300 OBA4 


0000 0896 
Caio 3037 
4300 QBA4 


0000 OGBA0 
C610 3038 
4010 OCcEO 
2421 

C816 GOFD 
9501 

020 aC92 


752 
753 
754 
755 
756 
757 
758 
759 
760 
764 
762 
763 
7a4 
765 
766 
7a7 
768 
769 
778 
771 
772 
773 
774 
775 
776 
777 
776 
779 
780 
7al 
782 
783 
784 
785 
786 
7&7 
788 
789 
790 
7931 
792 
793 
794 
798 
796 
7197 
798 
739 


- 600 


&o1 
802 
&03 
BOY 
605 
856 


( 


PAGE 


LB R5*ASCiR5) 
STB R5,8S658 
LHR RSyR12 

NHI R5,15 

L8 R5SeASCIRS) 
STB R5s6S658e41 
LHR R5«RE 

SRLS R524 

LB R5sASC(RS) 
ST38 RS.4S658.1 
LHR R5-RG6 

NI R3e15 

LB RSeASC(RS) 
STB RS.8SGS8.,1¢1 
LHI R1L,C*O5?* 

L8 RS+«ETESTNO 
CLHI R5SexX*34? 
BNE ERST 

Li R2.sERRCOUNT 
CLHI R2<336 

BNL LOGERPRT 
LHI R3,ERRFLO(R2) 
LH R1ieMSG58 
STH RisO(R3)} 

LH R1«MS558.1 
STH R1s20R3) 

LH RishSGA.S 
STH RLe4i RS) 

tH R1.sASGA.4 
STH R1+6(R3) 

LH R1eMSGA.442 
STH R1i+8(R3) 

LH R1eASGA.5 


~STH RielQ(R3) 


LH R1»MSGA.S+2 
STH R1el2(R3} 
AHI R216 

STH R2sERRCOUNT 


* TEST SWITCH BAd 


ERO6 


* DISABLE SWITCH BAD 


ERO? 
* ENABLE 
EROS 
ERST 


ERRCOM 


fst THESR1 
Egu * 

LHI Rk1.C*06° 
8 ERST 
Eau * 

LHI Kki.»Cto7?* 
8 ERST 
SWITCH BAD 

EGU * 


LHI R1,C*o08* 
STH R1eERRNO 
LIS R251 

LHI R1leX*FO?* 
EPSR ROAR 

STx R2.ISITERR 


10255:07 08/02/78 
CONVERT TO ASCII 


LOAD INTO WORK 
MASK OFF LEAST SITS 
CONVERT TO ASCII 
SET UP MSG 

LOAD INTO waRK 
SHIFT OVER 

CONVERT TO ASCII 
SET UP MSG 

LOSD INTO WORK 
MASK OFF LOWER BITS 
CONVERT TO ASCII 
SET UP #SG 

LOAD 5 

LOAD TEST NUMBER 
IS IT TEST 4 

NO SKIP 

LOAD ERRCOUNT 
LIMIT 21 ERRORS 
PRINT THEM 

LOAD QUEUE POINTER 
LOAD DATA 

STORE IN QUEUE 
LOAD DATA. 

STORE IN QUEUE 
LGAD SATA 

STGRE IN QUEUE 
LOAD DATA 

STORE IN QUEUE 
LOAD DATA 

STORE IN QUEUE 
LOAD DATA 

STORE IN QUEUE 
LOAG DATA 

STORE Il QUEUE 
INCREMENT ERRCOUNT 


LOAD 6 


LOAD 7 


LGAD 8 
STORE IN ERROR ¥S6 


DISABLE INT. @ PROCESSGR LEVEL 


SET ERROR FLAG 


AL207519 
AL207520 
AL267530 
AL207540 
AL207550 
AL2c7560 
ALZO7576 
AL207580 
AL207599 
AL207600 
AL2c7610 
AL207620 
AL207630 
AL207640 
AL207650 
AL207660 
AL207676 
AL207680 
AL207696 
AL207700 
AL2O7716 
AL 207720 
AL207736 
AL2077490 
AL207756 
AL207766 
AL2O7770 
AL207780 
AL267799 
AL2078090 
AL 207810 
AL207820 
AL267830 


‘AL 2078490 


AL207650 
AL 207860 
AL207870 
AL207880 
AL207890 
aAL2o7900 
AL207910 
AL267920 
AL207930 
AL 207940 
4.207350 
AL207968 
AL207979 
AL207980 
AL207390 
AL208006 
AL208910 
AL208020 
AL208030 
AL 208040 
AL208050 


wat 
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0884 


0BBS 


oBBC 
oBCo8 
eec4 
oBCa 
OBCA 
0BCE 


o8p2 
oBDEe 


GBDA 
QB0E 
OBE2 
OBE6 
OBES 
IBEC 
OBFO 
OBF4 
OBFE 
OBFS& 
OBFC 
ocaé 
oco4 
ocos 
ococ 
Oci0 
oc14 
0c1é8 
ocic 
8c20 
OC 24 
oc28 
OCZA 
OC2E 
6C32 
oC38 


8020 
caso 
41FO 
4810 
C515 
2135 
c8so 
41F 0 
0000 
41FO 
4300 
0000 
4810 
4010 
4010 
9014 
4010 
C850 
41F 90 
2439 
2420 
Cale 
0191 
4090 
4OA0 
4080 
40CO 
4000 
40E0 
4OFQ 
caso 
41FO 
CA20 
2631 
4536 
4239 
4360 


co90 
OALO 
0108 
Q4FE 
0123 
45367 
89A8 
CDEF 
0123 
4567 
&9AB5 
CDEF 


oC98 
ocoa 
0800 
OcEd 
3035 


ODAE 
0600 
0aDd2 
o98&6 
9860 
GBOA 
oc34 
9C92 
o0cg98 


vC96 
OE16 
08)0 


1E74% 
0000 
GE44 
SE4uE 
0E54& 
GESS 
OESA 
OESE 
0£60 
OESE 
08D0 
0610 


9C96 
OBFS 
0860 


807 
898 
809 
619 


STH R2«NOERR 


ERR1 LHI R5,ERRMSG 
BAL LINK «PRINT PRINT "ERROR TINK? 
LH R1seERRNO LOAD TEST IN ERROR 
CLHI RiX*3035'* IS IT ERROR 5 
BNES ERR2 


LHI R5eMSG5S7.1 WAS SHOULD BE 


BAL LINK «PRINT PRINT IT 
ERR2 EQu * 
BAL LINK +sCRLF 
8 TSTEND 
LOGERPRT Eau * 
LH R1,ERRCOUNT LOAD ERROR COUNT 


STH RieISITERR 
STH R1-sNOERR 
SRLS R14 

STH R1eERL COUNT 
LHI RS+4S693 


ISITERR FLAG 

NOERROR FLAG 

DIVIDE BY 16 

TQ CALCULATE NUMBER OF LINES 
LOAD START OF #ESSAGE 


BAL R1iSePRINT PRINT HEADER 
LIS R3.0 INIT R3 
LIS R220 INIT R2 

LOGER1 LHI R1»ERRFLD(R2) LOAD QUEUE POINTER 
LM R9eO(RIT) LOAD 
STH R9eASGA.1 DATA EXPECTED 
STH R1i0+H4SGA.2 DATA ACTUAL 
STH R11eMSGA.3 CHIPADRS 
STH Ri2«MSGA.,4 ADDRESS HEX 
STH R13¢MSGA,4+2 ADDRESS HEX 
STH R14.eMSGA.5 AOBDRESS DECIMAL 
STH R15 eMSGA,5+2 ADDRESS DECIMAL 
LHI R5,4SGA LOAD UP MESSAGE 
BAL R1i5ePRINT PRINT 
AHT R2016 INCREMENT POINTER 
AIS R301 INCREMENT LINE COUNT 
CLH R3eERL COUNT FINISHED 
BNE LOGERL NO PRINT ANOTHER 
6B TSTEND TSTEND 
ALIGN & 

REKEKEKAE 


* ROATBUF CONTAINS THE KNOWN DATA WHICH 
* CORRESPONDS TO THE DATA ON THE TWO 


* TEST ROMS TOTAL BUFFER 1K OF DATA 

* BUFFER IS FILLED BY A SOFTWARE ROUTINE IN THE START SEQUENCE 
RDATSUF DCX 0sA10¢108 e4FE 1123646567, 89AR COEF 

RGATBUF1 OCx 123+4567,89AB,COEF FEOC,BAIS, 765423219 


AL208060 
AL208070 
AL208066 
AL208090 
AL208100 
AL208110 
AL208120 
AL208130 
AL2908140 
AL208150 
AL206160 
AL208170 
AL208180 
AL208190 
AL208200 
AL208210 
AL208220 
AL208230 
AL208240 
AL208250 
AL208260 
AL208270 
AL208280 
AL208290 
AL208300 
AL208310 
AL208320 
AL 208330 
AL206340 
&4L206350 
AL208360 
AL20837T0 
AL208380 
AL208390 
AL 208400 
AL208410 
AL2084%20 
AL208439 
AL 2084840 
AL208%50 
AL208460 
AL208470 
AL208480 
AL208490 


AL208500 


ee 


——_ 


( 


SERIES 16 ALG SUPPORT PROGRAM 


6c50 
ocs2 
CC54 
ocsé 


ocsé 
GC5A 


acec 
Vw 


OCSE 
oc6e 
0cé2 
0Cé4 
0C66 
Océ6Ee 
oc7é 
oc7s 


OC7A 


QOC7C 


OC7E 
oc80 
oce2 
GC 384 
0c86 
9c as 
OCA 
ocac 
OcBE 
0c90 
ocg2 
0C94 


‘OC9E 


0C98 
OC9A 
0C9E 
ocgc 


oc9D 


OC9E 
OC9OF 
OCAd 
ocal 
oCa2 
OCAS 
OCA4 
OCAS 
OCA6 
OCAT 


FEOC 
BA98 
7654 
3210 


3435 3637 
4344 4546 


06-194F02R61 


* 


REA EE KEK 
* DATA CONSTANTS 


* 

BIAS 
BLANK2 
FURT 
TREAD 
XON 
KGFF 
LOC 


FEED 
TSTP 
ASC 


CRTRD 
CRTWRT 
CARRD 
CARWRT 
CLIFRO 
CLIFWRT 
PASFLG 
CONADR 
SORDFLG 
SPECOUNT 
CONRD 
ROMCNT 
NTAPES 
ENCONT 
SPECFLG 
PTOP 
LOCX 
ISITERR 
ERRCOUNT 
ERLCOUNT 
NOERR 
CRTRG@2S 
CARRG2S 
CRT2NG 
CAR2ND 
LPWRT 
KBADR 
CRTENRD 
RQ25 
SECOND 
TTYWRT 
TTYRD 
TTYENRG 


SINK 


( 
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X*eo? 
X*20A0t 
X*SAAGe 
TWRT+1 
x*9193° 
XON+1 
x'aoar 

9 
X*AQAS* 
FEED+1 
C*0123456789ABCDEF * 


CLIFRO+2 


oanoncroaQqoooqoorcoeocacn 


2 KEYS0ARD CEV ADR 


AL208516 
AL208526 
AL208530 
AL 208540 
AL208550 
AL2908560 
AL208570 
AL208589 
AL208599 
AL 206608 
AL208610 
AL208620 
AL208630 
AL206646 
AL208650 


AL208666 
AL208670 
AL208680 
AL208690 
AL208700 
AL208710 
al 208720 
AL208730 
AL208740 
AL208750 
AL208760 
AL208770 
AL 208760 
AL208790 
AL208600 
AL206810 
AL2086820 
AL208830 
AL208B40 
AL208850 
AL208860 
AL208870 
AL208680 
AL206890 
AL208900 
AL208919 
AL208920 
AL208930 
AL208940 
ALzZ06950 
AL 208960 
AL 208970 
AL208980 
AL208990 
AL299000 


se 


— a EE 


Re Site nS tenn oOo 


SERIES 16 ALO 


OCaB 
Cag 
QCAA 


00 
60 
00 


5345 
3620 
565¢ 
GF47 
2031 
3031 
0000 
4552 
3930 
00G0 
0000 
co0g 
RES 
0000 
3F OD 
Sa&c 
S441 
SIGE 
5220 
oo0D 
S445 
2053 
e000 
S04C 
4F20 
5420 
8005 
5052 
4B20 
000D 
S445 
5443 
6000 
564C 
4F20 
4142 
4520 
0000 
504c 
SF20 
424 
0600 
4445 
aS4E 
SARS 
0090 
454E 
S749 


§249 
414c 
4F52 
5241 
3934 


S24F 


OcOF 
OCEG 
2045 


9143 
2054 
2cs2 


5354 
204F 


4143 
4O4F 
4D4F 


4553 


5354 
B29 


4143 
4946 
4C45 


4143 
4OGE 
4520 


5952 
4954 


4142 
5443 


SUPPORT PROGRAM 


4553 
4F20 
5420 
40290 
4630 


§220 


5252 


4520 
4159 
4541 


2031 
5220 


4520 
2054 
4445 


5320 


2053 
4Fa3 


4520 
2044 
204D 


4520 
2045 
4D4F 


4553 
uS4ut 


4Cas 
4820 


2031 
5355 
$052 
3036 
3252 


3039 


4FS2 


444) 
4520 
4445 


2C32 


343F 


414C 


4553 


4252 


57493 


414C 
4953 
4F 44 


414c 
HER 
4445 


5320 
4C49 


2053 
4F4aR 


902 
903 
904 
$05 
906 
907 
308 
9093 


910 
211 


912 
913 
$14 


935 
916 


917 
918 


919 
920 
921 
322 


$23 
924 


925 
926 


927 
926 


929 
930 


931 
932 


06-194F 02R01 
cOonend 08 
CONENRD C8 
CONRG@2S 0B 
* 
* MESSAGES 
* 
TITLE oc 
oc 
ERRHSG DC 
ETESTNO EGU 
ERRNO FQu 
NOERMSG OC 
QhSG oc 
MSGi CC 
bc 
MSG12 oc 
oc 
4SG651 Oc 
oc 
MSG52 Oc 
oc 
4SG53 BC 
DC 
S654 DC 
oc 
HSG655 DC 
oc 
MSG656 oc 
CC 
MSG57 BC 
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C*SERIES 14 ALO SUPPORT PROGRAM 06-194F02R01° 


x*ao? 
CtERROR OO00*.x*O00aQ' 


#5 
«-4 STORE ERRNO AS CHAR CONSTANT 
C'NO ERROR*.x*9000" 


x*3Fa0° 
C*PLACE OATA TAPE IN READER? 


x*0D* 
C*TEST 1e2e3 OR 478 


x'oD? 

C*PLACE ALO IN TEST MODE® 
x*o0° 

C'PRESS BRK* 


x*abd# 
C'TEST SwWiTCH aK* 


x'abt 
CtPLACE ALG IN OISABLE MODE® 


xfaoe 
C*PLACE ALO IN ENABLE MODE? 


K'g9! 
CtOEPRESS INITIALIZE? 


x'oo? 
C®ENABLE SWITCH OK 


AL 209010 
AL209020 
AL209030 
AL 209040 
AL209050 
AL209060 
AL209070 
AL209080 


AL209090 
AL209109 


AL209110 
AL209120 
AL209130 


AL 205140 


AL209150_ 


AL209160 
AL209170 


4L209180 
AL2091990 
AL209200 
&AL209216 


AL209220 
AL209230 


AL209240 
AL209250 


AL209260 
AL209270 


AL 209280 
AL209290 


AL209300 
AL 209310 


yetty 


( 


SERIES 16 ALS 


ODAC 
ODAE 
oODB2 
coB4 
0038 
o0ce 
CDCH 
oDcée 
coce 
copa 
oops 
QDDE 
0DEO 
ODES 
ODEA 
o0F2 
GOFA 
ODFC 
OBFE 
DEQ6 
CECE 
OE16 
0£18 
0£20 
cE28 
0E30 
0E38& 
OESC 
OEZSE 
GE46 
Of4E 
CES6 
CES5E 
DEG62 


QE64 
SE66 
OE68 
OCGA 
oESsc 
OEGE 
0£70 
oE72 


CE74 


LE74 
1Fb4 
iFDs 
lf Dé 


oaoD 
4953 


_ 0000 


2020 
5348 
4520 
0000 
ceoo 
5349 
5320 
E44 
9000 
434g 
0000 
KEY 
5357 
46826 
000D 
4E55 
4620 
4F20 
o00p 
4u4y 
2020 
5850 
2020 
4144 
oboo 
2020 
2020 
2020 
2020 
2020 
ona 
0090 
coco 
0000 
0000 
0000 
3030 
3030 
3030 
27160 
0368 
0064 
000A 
0001 
6090 


0009 


2020 


202e 
4F55 
2020 


74E 
4F52 


4045 
3420 


5341 
4954 


4D42 
524F 
5645 


5441 
4641 
2026 
4144 
2544 


2020 


2020 


2020 
2020 
2020 


OE44 
GE4E 
OE54 
SE58 
OESE 


OETS 


1E73 


SUPPORT PROGRAM 


444 


4554 
2044 


2 2tey 
VIO 


5255 


424C 
4348 


4552 
&053 
5249 


2041 
5441 
4348 
2E48 


2020 
2920 
2920 
2020 


2042 


4943 
5S94E 


E20 


4520 
204F 


204F 
2554 
4659 


4354 
2045 
4950 
2020 


2020 
2620 
2626 
20206 


949 
950 


96-194F02R01 
boc 
MSG57.1 OC 
MSG5& DC 
DC 
BC 
MS658.1 OC 
oc 
SORDFORM DC 
DCX 
MSG60 DC 
BC 
MS680 BC 
BC 
HSG82 oc 
oc 
MSGS DC 
DC 
MSGA oC 
4MSGA,1 EQU 
MSGA.2 Eau 
MSGA.3 Eau 
MSGA.4 Eau 
MSGA.5 EQu 
DECI DC 
DECITAB OC 
LNZ8 Eau 
ROMBFR DS 
RMBED EG@ 
ERRFLO DS 
IOSAVE DS 
ALIGN 
RSAVE DS 
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C*SHOULD BE : 


Ktg? 
X'oD? 
C*SIGNETICS OR OYNNANICS?® 


9D 
C*HIT RUN* 
Kop! 


CtOTSABLE SWITCH OK ° 


x'oot 
C*NUMBER OF ROMS TO VERIFY! 


x*o0* 
C*DATA ACT DATA ExP CHIP AD.H AD.Dt 


x*o0000° 

G *.x*9000" 
MSGA+6 DATA ACTUAL 

MSGA+16 DATA EXPECTED 

MSGA+22 CHIP 

MSGA+26 AODRESS I8-HEX 

MSGA+32 ADDRESS TH DECIMAL 


C*o0".c*oo',.C*00? 


19000.41000+100+01001 


*o1 
x*1000° 
*e1 

352 

2 

8 

32 


AL209320 
AL209330 
AL209340 
AL269350 
&L209360 


AL209370 
AL209380 
AL209390 


AL209800 
AL209410 
AL209420 
AL209430 


AL209440 
AL209450 


AL209%60 
AL2054%70 


AL 2094890 
AL 209999 


AL209509 
AL209510 
AL209520 
AL209530 
AL209540 
AL2G9550 


4.209569 


AL209570 
AL209580 
AL2095990 
AL209600 
AL209610 
AL203620 
AL299630 


SERIES 16 ALO SUPPORT PROGRAM 


CHKSUM/H17 PUNCHER 


iFFS 
IFFA 


lFFC 
2000 
2002 
2006 
2008 
200c 
200E 
2012 


2016 
201A 
201C 
201E 
2020 
2022 


2024 
2028 
202c 
202£ 
2030 
2034 
2036 
203A 
203€ 
2040 
2042 
2046 


204A 
204E 
2052 
2056 
205A 
205C 
205€ 
2069 
2062 
2064 
2066 
206A 
206E 


2072 
2076 
2076 
2o7c 


2400 
9519 


C819 
2421 
C839 
2440 
D351 
O745 
C110 
0240 


célg 
9E21 
S444 
9824 
9411 
9501 


0360 
Dré60 
3D60 
2081 
S1FO 
94911 
C830 
0AG1 
9060 
2081 
cilo 
&1FO 


D340 
ce@19o 
C830 
0351 
G745 
9A65 
9401 
9626 
9060 
2081 
cilo 
G1FO 
4300 


C600 
2303 
C800 
270i 


a500 
OET3 
0000 


2008 
0091 


0080 


COTA 
QO7E 


2072 


OOCF 
0000 


20358 
2078 


gos 
0500 
dE73 
o00G 


G6-194FG2R01 


* 
SCHKSUB 


* 


$GEN 


$PUNCH 


$PNCH1 


SPNCH2 


STAPL 


STAPL1I 
STAPLP 


PAGE 20 


RO.0 
R1.KO 


Riex*500°* 
Rés1 
R3«LNZB 
R40 
R5e0(R1} 
R4eRS 
R1+$GEN 
R4 eHNt3 


R1ieX*G030' 
R2sR1 
R4,R¥ 
R2,R4 
Riesk1l 
RO.R1 


RGeX*TAt 
R6eX* 7B! 
R6«RO 

Bai 
Ri5eS$TAPL 
RieR1 
R3«eX*cr? 
R6&20CR1) 
R6»sRO 

Bal 
R1eS$PANCH1 
R15,$TAPL1 


R4sMN+3 
R1i-X*S00° 
R3.LNZ8 
R5s0(R1) 


R1,$PNCHe 
RisSe«STAPL 
STAPE 


RO,256 
STAPLP 
rO+85 
RGal 


10355307 08702/78 


PUNCH M17 TAPE WITH CHECKSUM 
SELECT REG. SET 0 


START 
INCREMENT 


FINAL 
CHECKSUM BYTE 


CHECKSUM BYTE TO BOOT LOADER 


DISPLAY : NORMAL MODE 


CHECKSUM BYTE TO 01 


HALT PROCESSOR. 


GET BOUTOV (PUNCH) ADORESS. 
START TAPE PUNCH 


PUNCH LEADER 
(R1) = X*0G680" 


PURCH BOOT LOADER 


PUNCH ONE-FOLD GAP. 


GET CHECKSUM BYTE 
START 


PUNCH PROGRAK 


DATA ADDRESS TO OISPLAY, 


PUNCH TRAILER, 


DISPLAY CHECKSUMe HALT PROCESSOR, 


TO PUNCH BLANK LEADER 


TO PUNCH L*FOLO GAP 


AL209660 
AL209670 
AL209680 
AL209690 
AL209700 
AL209710 
AL209720 
AL209730 
AL 209740 
AL209750 
AL209760 
AL209770 
AL209780 
AL209790 
AL209600 
AL209610 
4L209820 
AL209830 
AL209840 


AL209860 
AL209870 
AL209880 
AL2098990 
AL209900 
AL209910 
AL209920 
AL209930 
AL 209940 
AL 209950 
AL209960 
AL2C9970 
AL209980 
AL209990 
AL210000 
4210010 
AL210020 
AL210030 
AL210040 
AL210050 
AL210660 
AL 210070 
AL210080 
AL210090 
AL210100 
AL2i10110 


AL210130 
AL210140 
AL210159 
AL210160 


we, 


oe ee te rami teehee pe een tL CEO TCALCS LEC OR CNEL RA tt ons 


ia 


peed 


Sal 


( 


SERIES 16 ALO SUPPORT PROGRAM 06-194F02R01 


CHKSUM/M17 PUNCHER 


207E 
2080 
2082 
208% 
2086 
2088 


2084 


o32F 
2430 
9A65 
9D63 
2081 
2206 


1618 
1619 
1626 
igel 
1622 
1023 
1624 
1025 


Ris 
R3.0 
RGsRS 
R6eRB 
Sel 
$S$TAPLP 


RETURN 


PUNCH BLANK FRAME 


CONTINUE. 


AL210170 
AL210180 
AL2101956 
AL210200 
AL216210 
AL216220 
AL210236 
AL210240 


et 


a 


Fe EN A TE RP CS eR TS TS Ae pT I ae Ny EF Se oe SR ES 


SERIES 16 ALO SUPPORT PROGRAM C6-194F02R01 PAGE 22 10:55:07 08/02/78 


CHKSUM/ML7 PUNCHER 


ASSEMBLED By CAL 03-066kK05-900 (32-SIT) 
START OPTIONSS T=16eSCRiCRO 
NO CAL ERRORS 
NO CAL WARNINGS 
2 PASSES 
$CHKSUM 9000 1FF& 966% 
SGEN 9000 2008 975* 977 
SPNCH1 0000 2034 994% 997 
SPNCH2 acod 2356 1003*« 1019 
$PUNCH 0000 2024 9a7* 
STAPE 0000 2016 980* 1012 
STAPL 0000 2072 991 1011 1014 
STAPLI 6900 2678 998 1016 
$TAPLP 0000 207C 1015 1017% 1023 
ABSTOP 0000 206A 
ADC 0000 0002 
ALQBUFEC 90000 OGFE 102 
ALOBUFST 9000 019006 100* 300 320 
ASC Q00G CC6é 420 752 756 Tac 754 866% 
ASTSK 0000 0984 176 357 381 6u8* 
Blas 0000 0C54 162 856% 
BLANK2 0000 OCSA 8STs 
BOOT oo0g 0082 66% 
C300 $000 0535C 133% 
CAR2@ND 6000 9C9D 135 891 
CARDRYV 3000 O9F6 624 634% 
CcarRrd ocgd oc7a 134 869% 870 
CARRG2S 0000 OCSB 136 B89 
CARWRT o000 OCc?79 635 870% 
CLIFAOR e680 0504 110% 149 425 
CLIFRD ooggc &8Cc7TA 150 B7 1x 872 
CLIFWRT 0006 GC7B 626 872% 
CNTEST QG0O 60a 212 
Con2nD Q000 SCcAs 154 902 
CONADR 6000 SCTE 152 503 546 586 694 874" 
CONENRD ocoo 0CAd 903% 
CONRD 0006 O6Cc84 153 583 699 877% 
CONRAZS 0000 OCAA 145 704 304% 
CRLF S060 0986 155 i568 471 391% 602 607 816 
CRT 9000 Q54E 130 138% 
CRT2 0000 O55A 137 141* 
CRT2ND a06c OC9C 1393 890* 
CRTORV 0000 O9£2 615 626% 
CRTENRD 3000 OCA &S4% 
CRTGET ococ GAsc TUS 
CRTRO Q600 3C7é6 138 B67x 868 
CRIRG2S B006 GCOA L4u 888% 
CRTBRT GG60 OC77 629 866% 
DAT vdud 6003 41 
DECI 90090 GABC 724% 729 734 


SERIES 16 ALO SUPPORT PROGRAM 96-194F02R01 


CHKSUM/M17 PUNCHER 


DEC2 9009 GACE 728 730% 

DEC3 g00c0 OAEO 737% 742 

DECS g000 OAF2 730 743% 

DECASC GOOG OAAYS 42e 7i7x 

DECI 0000 GE64 713 720 Fai 

LECITAS Q000 OFGA 724 728 957* 

OEY 0000 S004 43% 

Ors OG0G 0640 271 276% 

DPINIT 0000 O&AA 211i. 2357 252 

ECHO o0c0 G95C 583% 

ECHRTN 0000 0982 585 590* 

ENCONT GOQO0 OCcasA 257 374% &79 

ENTSTOK 0006 0654 309% 493 

EResS 0000 GAF& 266 322 &30 

EROE 0009 0899 245 247 792+ 

ERO7 60060 0598 491 T96% 

EROS 0000 SBAS 306 800* 

ERLCOUNT 6096 OC96 166 823 841 

ERR1 ooed osBs 808+ 

ERR2 co0c OaD2 &le2 615% 

ERRCOM 0000 GBAA 804% 

ERRCOUN 0000 OC94 165 u57 770 

ERRFLG 6000 1E74 773 828 961 

ERAMSE. 0900 0CcDé 808 Sills 

ERRNO 0600 OcEO &b2 829 913 

ERST 0006 SBA4& 769 T34 798 

ETESTNO 0600 OCOF 176 767 912 

EXEC 0500 O6BA 240 255 314 

EXecl 9000 O8Ad 276 397 49B* 

EXEC2 9000 0882 5909 503% 

FEEL du00 OC64 BER 865 

GETCHR 3660 0960 177 358 382 

GoT1 occa 0780 38e% 390 

S0Te e000 0794 386 S89" 

SOT3 oguG O79A 384% 391% 

GOT4 9000 079C 238 392* 

GOTIT 9e00 o57C 146 1523 

IMPTOP 6000 G000R 

Io 9000 0500 106% 172 703 

TOSAVE 0000 1FD% 173 527 541 

ISITERR ocdo OC92 164 602 606 

KBADR 0000 OCSF 693% 

KBREAD oc00 BATA 578 698 

KEEP? 0000 6866 S67 

LAOC ocoG 0001 

LASMG G000 S7EA 417% 424 

LOWT 0606 00C)0 68* 96 

LEADER 09000 0094 72x 76 

LINK 9000 GOOF 59% 126 155 
254 2538 277 
405 470 71 


593 $95 601 
LINK1 og00 0096 a7 ® 


386 


789 


802 


369 


578 


616 
806 


( | 
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737 956% 

366 50i* 

819 885% 

S07* 

712 942% 

820 B8B4*% 

167 i75 177 210 213 
311 313 356 354 365 
43S 382 50a $21 $30 
607 6106 663 693 713 


236 
366 
534 
809 


239 
376 
536 
814 


249 
378 
560 
614 


251 
396 
580 


et 


em et A A A A ANNAN A A Ai A td ttc at tama acces rmmnacmimmme meas, scammer 


c SERIES 16 ALO SUPPORT PROGRAM 06-194F02R01 PAGE 24 106:355:07 08/02/78 
CHKSUM/M17 PUNCHER 


we 


LINK2 9000 


o007 


4S% 211 237 240 252 255 278 307 314 366 349 397 506 
514 
{ LINKS ao000g 9008 Six 
LNZB ocgcgsc GE73 68 9584 973 1982 
LOAD 6600 GOa4% 77x 85 
{ Loc acogo Océ6d 86e*" 
LOocx oo00 ocg9o 883* 
LOGERL 0000 UBF& 826% Bue 
: LOGERPRT S566 Oo8Ua 458 772 818% 
LPAGR 0000 0506 11lix 631 
LPORV 0000 O9EC 622 631* 
f LPwRT 3600 OC3E 63e 892* 
MN 0000 008E 659% 978 1000 
MSG11 0000 OCFO 395 916% 
t MSG1l2 aogo0 @a0c 174 918% 
HS651 0000 OODLE 236 253 367 ' 926% 
MS652 0000 0536 507 922« 
1 4S653 90090 df42 248 924" 
4S654 6600 0052 269 235 250 276 312 364 377 926% 
4S655 0000 OC6E 205 928% 
i MSG56 0000 0968 §01 930" 
MSG5S7 000a On9C 310 932% 
ASGS7.1 0080 ODAE 813 934x 
{ MSG58 0000 0682 753 757 774% 935« 
4S656.1 0060 O0DCc4 T61 765 776 936* 
MSG60 9009 ODEO 498 942s 
{ MSG80 0000 GDOEA 2ilz 944% 
MSGa2] N000 QDFE 355 S46% 
486 0000 0618 824 94ax 
é MSGA 0000 OEFS3E 637 950*« 951 352 953 954 955 
MSGA.1 0000 GE44 &30 SS1x 
MSGAc2 0000 OE4E 631 952" 
( MSGA.3 oogogc 0&54 Hit 778 632 953* 
MSGA.4 0000 0£56 &21 780 782 &33 834 954s 
MSGA.5 0800 OCESE 427 784 786 835 836 955* 
i NOERMSG 000g0 OCE4 469 914% 
NOERR o0oo 9Cc98 163 4E7 B07 B21 867+* 
NTAPES 0000 O0cs8é 360 370 400 4&5 453 455 879 
n ORIGINI oog0c GAnN 642% 
ORIGIN2 0000 GANS 643% 
ORIGINS ocd0 OA0DS 644% 
n ORIGING 0000 OADC 645 
OTc.9 0c00g 0914 545% 550 553 561 
OTcel 0036 O091C 549% 
£ OTCe2 Q20qo0c 6926 S46 552% 
OTC.3 0000 0938 555 558" 
OTC .4% vOSG 352 5ohe 570 
ouTS ocec 0954 565 569 S71* 
ouUT12 00G0 YS5A S40 S72* 
GUYCHR oc09 0962 521 §39 53R4 S4a* 593 595 6190 
OUTCHR2 Gud 346 543 551 557 562% 
PASFLG 9860 Oc7C L4e 144 750 B73 
PASLADBR VO0u A562 105% 141i 626 634 


pte 


ae 


vw" 


a) 


* 


( 


SERIES 16 ALG SUPPORT PROGRAM C6-194F02RG61 


CHKSUM/N17 PUNCHER 


PAUSE GUGG OSSE 
PNT 0060 9605 
PRESBRK1 3000 O5C6 
PRINT o600 0800 
PRINT2 oo0o 0804 
PRINTS 0600 0654 


PRINTSA 0006 d8Fé 
PRINTSB 0000 C8F& 
PRINTS acgg 8aFCc 


PToOP 0000 OC&E 
PURE TOP 6000 0600R 
QMass g000 OCEE 
QUESTN 6000 Q99A 
RO 9000 0000 
R1 9000 0001 
R19 oGCG OODA 
R11 occo g008 
R12 0000 GO0OC 
R13 30090 0006 
R14 000 OOGE 
R15 cCOO OOOF 
Re 9000 9002 
RS vGd0 0093 
R4 cGoo coc 
R5 o0c0 ocas 


556 
162 
213 
378 


560 
163 


236 
382 


141 


1006 


PAGE 


573+ 
164% 


239 
396 


25 16:55:07 


165 


249 
476 


166 


2D1 
499 


88/02/78 


254 
502 


277 
568 


149 
505 
582 
629 
735 
1617 
124 
261 
5c5 
630 
777 
861 
969 
1091 


633 


4e9 


135 
300 
37% 
673 
807 


273 
4O1 
676 
7B1 


145 
4214 
5S2 
731 


8y 


396 
519% 


152 
519 
S91 
631 
743 


134 
263 
527 
633 
778 
892 
S71 
1003 


5406 


139 
391 
499 
673 
827 


274 
402 
677 
783 


178 
423 
594 
737 


89 


311 
604 


160 
535 
605 
632 
805 


138 
273 
526 
636 
7T3 
B04 
975 
1006 


602 


144 
316 
#10 
678 
a28 


297 
418 
718 
785 


179 
520 
609 
738 


156 


313 
803 


166 
541 
695 
634 
968 


150 
370 
547 
656 
78a 
805 
977 


1010 


744 


151 
316 
411 
681 
439 


297 
419 
749 
78aT 


181 
522 
672 
974% 


178 


SERTES t6& ALO SUPPORT PROGRAM 06-194F02R01 PAGE 26 203SSi87 oa702778 


CHKSUM/SMI? PUNCHER 


209 212 235 238 248 256 253 276 303 304 305 310 312 
355 364 367 377 379 395 416 426 469 480 481 498 Sol 
507 503 511 520 524 603 689 690 691 723 723 727 732 
733 735 737 740 741 750 754 752 752 753 754 755 756 
756 757 “758 759 760 760 Tol 762 763 T64 764 765 767 
768 808 813 824 837 975 976 1003 1004 1005 

R6 0000 0006 46x 63 79 86 263 265 318 321 329 429 %78 478 481 
&82 4a3 511 512 650 450 66B 669 681 758 762 987 988 
989 994 995 1005 1008 1020 1021 

RF 9000 0607 46« 88 89 479 463 651 652 653 655 674 676 

RB goog oco8s SO« 80 81 86 87 653 674 1021 

Rg eooe c009 Sax 406 442 583 584 586 587 589 655 656 662 664 666 
667 669 700 823 a30 

RAG3 0000 G83E 447 44x 

RAG31 9000 0834 436 4Eys 

RBZER coos Ga7o 690" 692 

ROAGL 0000 Ga74 261i* 269 

RDAG12 ocoo cCeTa 262% 275 

ROANSTUF OGOC CA14 650% 

ROASF aced CALE 653% 669 679 

RDASF1 0000 GA44 665 667% 

ROASFe2 0000 Oaec 4a? BY De 

ROASF21 0000 GA36 659 661% 

RDATBUF 0000 0c38 261 318 850* 

RDATBUF1 o600 GCcH#a 273 329 851+ 

ROBYTE 60600 CA14 405 649% 

RDSPECL 0000 JA54 674* 680 

READSPEC 00006 0A50 657 671% 

REDAG 9000 OTA4& 395% 456 

REDAG1 0000 O7c2 403% 4g. 443 

RMBED 0009 1€73 960% 

ROMBFR 9000 0&74 264 464 4Bl 699 S594 

ROMCHT 0006 OC86 354 4909 452 878s 

ROMREAD 0000 O87C 256 376 477% 

ROMREAD2 2UG0 0864 4al* 484 

ROMRTN e008 0A10 646% 

RQ2s o000 SCAL B95+ 

RRAG 0900 0768 375* 

RSAVE a00o0 1FG8 116 519 535 591 TLT 743 Saye 

SECOND 9000 GCA2 896% 

SETKB 9600 GA9S 128 709% 

SETUP o00G Q9BE 563 616*% 

SINK Goce GCAT 546 5a7 703 90ls 

SORDFLG ao00 ocao 392 431 658 8754 

SORDFORK 9000 GOCS 373 940% 

SPECFLG aco0 ocac 208 304 489 aaix 

SPECHAR 9000 O7CA 4 06x 

SPECOUNT 90699 OCa2 393 434 436 B7S* 

SPECRET 2606 0ag0 4aS% 646 

SPECTRUE 0000 0702 4O8« 682 

st aua0 OS1E 123% 

START 9000 O52C 123 128% 

STARTI C600 C405 Lives es 642 E45 Sou 645 


Freee 


a, 


SERIES 


CHKSUM/M17 PUNCHER 


STTTST 
TIE? 
T4ESR 
T4¥ESR1 
TAGN 
TEST 
TESTI 
TESTle 
TEST2 
TESTS 
TEST4 
TITLE 
TREAD 
TST31 
TST32 
TST33 
TST3SZ 
TSTEND 
TSTENDI 
TSTP 
TTY 
TTYORYV 
TTYENRD 
TTYGET 
TTYRD 
TTYWRT 
TWRT 
XOFF 
XON 
ZERRGBF 


1&6 aLG SUPPORT PROGRAM 


9060 
0000 
9600 
a0006 
0000 
9000 
oo00 
6000 
o006 
o6cag 
oooo 
909090 
0000 
o000 
0000 
0000 
0006 
9000 
0006 
9000 
0000 
0000 
ooag 
e009 
0080 
Q000 
0006 
5600 
0000 
0006 


05398 
089% 
uUa&26 
GSi6 
o5c8 
05B4 
C5Fa 
C616 
G6l6 
86380 
O71A 
GCAC 


G6=-194F02R01 


472 


437 
739 
188 


206% 


233% 
296% 
3S2* 
909% 


325 
331 
332% 
302 
279 
a7 ae 


147% 
625* 


859 


&61 
687* 


439% 


$63 


333 


459 


HEU 


( 


PAGE 


817 


oF 


10:55:07 


843 


08/02/78 


— 
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